doc: Add Roamdmap.
authorJan Nieuwenhuizen <janneke@gnu.org>
Wed, 29 Mar 2017 06:05:18 +0000 (08:05 +0200)
committerJan Nieuwenhuizen <janneke@gnu.org>
Wed, 29 Mar 2017 06:05:18 +0000 (08:05 +0200)
* HACKING: Add roadmap.

HACKING
doc/examples/main.c
scaffold/hello.c [new file with mode: 0644]
scaffold/micro-mes.c

diff --git a/HACKING b/HACKING
index 17009485a98540bb489e3f1734690ff2fed2fda8..6cd6b1cb7b0356cb41cbb2f08f5ad745dde82dc0 100644 (file)
--- a/HACKING
+++ b/HACKING
@@ -1,11 +1,61 @@
 -*-mode:org-*-
 
-* Fully source-based bootstrapping
+* ROADMAP
+** TODO release 0.5
+  1. mes.c: prototype Scheme interpreter in C, mature enough to run
+  2. guile/mescc.scm: C compiler on [Guile] Scheme, that can compile
+     2a. scaffold/hello.c: Simplest C program, compiled with 2.
+     2b. scaffold/micro-mes.c: main of 3. (2nd Scheme interpreter) + mlib.c
+     2c. scaffold/cons-mes.c: run simple hardcoded sexp
+     2d. scaffold/tiny-mes.c: load memory dump, run simple sexp
+     2e. scaffold/t.c: c compiler tests, enough to support compiling
+  3. scaffold/mini-mes.c: 2nd Scheme intepreter in C, without [g]libc, using
+  4. mlib.c: Minimal Mescc C library
+     4a. scaffold/hello.c: Simplest C program, compiled with 5.
+     4b. scaffold/micro-mes.c: main of 3. (2nd Scheme interpreter) + mlib.c
+     4x. *we are here, any more steps to reach 5*
+     rm -f a.out; MES_DEBUG=1 scripts/mescc.mes scaffold/micro-mes.c > a.out
+     4c. scaffold/cons-mes.c: run simple hardcoded sexp
+     4d. scaffold/tiny-mes.c: load memory dump, run simple sexp
+     4e. scaffold/t.c: run c test suite with scripts/mescc.mes
+  5. scripts/mescc.mes: C compiler on mes, that can build mini-mes
+     5a. remove __MESC__/__NYAC__ C workarounds in gc.c
+     5b. module/language/c99/compiler.mes: refactor expr->arg, expr->accu, ast->info
+     5c. merge *.c into scaffold/mini-mes.c
+     5d. merge scaffold/mini-mes.c into mes.c
+  6. scripts/mescc.mes: C compiler on mes, that can build mes
+  7. release self-hosting Mes 0.5
+     7a. discuss full source bootstrap strategy on guile-user with
+     Orians Jeremiah (stage0+) Luca Saiu's (GNU Epsilon).
+** release 0.x, unsorted
+  - produce intermediate annotated assembly-like mes.S
+  - AND/OR: connect to GNU Epsilon's VM
+  - AND/OR: connect to OriansJ's stage0...LISP bootstrapping tools
+  - real module support, bonus for supporting Guile's define-module/define-public syntax
+  - get full source syntax-case up (Andre van Tonder?) OR drop
+    psyntax/syntax-case and rewrite Nyacc without syntax-case+R7RS Ellipsis
+  - support regexp OR rewrite Nyacc without regexps
+  - split-off Guile C compiler as standalone Guile project, still
+    respecting no-syntax-case bootstrap requirement
+*** Compile the [[https://en.wikipedia.org/wiki/Tiny_C_Compiler][Tiny C Compiler]]
+  - build tcc (tinycc)
+** release 1.0
+  - work to replace GuixSD's bootstrap binaries for x86
+  - more architectures?
+
+** DONE
+** Support call-with-current-continuation, refactor catch/throw
+** 0.4: Support Nyacc, Gcc-compiled Mes compiles minimal main.c using nyacc
+** 0.3: Garbage collector
+** 0.2: Support psyntax
+** 0.1: Mes eval/apply feature complete; support syntax-rules, compile main.c using LALR, dump ELF
+
+* Full source bootstrapping
 
 ** R6RS-like scheme interpreter
 This first part is prototyped in C by the mes.c core and Scheme
 bootstrap code in module/.  Of course, while mes.c is pretty small it
-cannot serve as a fully source-based solution.
+cannot serve as a full source solution.
 
 The initial idea was to have the minimal core support LISP-1.5 (or
 something very close to that as a tribute to John McCarthy) and extend
@@ -24,7 +74,6 @@ time to start doing something useful.
 
 * Bugs
 ** The Scheme reader is very slow.
-** Catch/throw are a syntax only hack for Nyacc.
 ** Fluids are a hack for Nyacc.
 ** Prototype mes.c depends on a C compiler.
 *** Translate C-prototype mes.c into annotated hex?
@@ -37,15 +86,6 @@ Another idea (thanks Rutger!) is to rewrite the mes.c core in a s-exp
 C/Assembly variant and thave mescc produce the simple, annotated
 bootstrap binary.
 
-** Actually do something useful
-*** Rewrite the mescc compiler to work on the Nyacc AST.
-The proof-of-concept mescc compiler uses a simple, whoefully
-incomplete AST produced by a simplistic LALR-based C-parser.
-*** Implement more bits of the compiler.
-As Mes now runs Nyacc, and Guile runs the mescc compiler, this
-compiler can be developed using Guile.
-*** Compile mes.c using mescc.
-A first milestone, next up is...
 *** Compile the [[https://en.wikipedia.org/wiki/Tiny_C_Compiler][Tiny C Compiler]]
 
 * OLD: Booting from LISP-1.5 into Mes
@@ -94,15 +134,10 @@ MES_TINY=1 ./mes-32 --dump < module/mes/tiny-0.mes > module/mes/tiny-0-32.mo
 
 ** C assembler/linker
 *** [[http://www.tldp.org/HOWTO/Assembly-HOWTO/linux.html][Assembly HOWTO]]
-*** System call clue bat
-Basically, you issue an int 0x80, with the __NR_syscallname number
-(from asm/unistd.h) in eax, and parameters (up to six) in ebx, ecx,
-edx, esi, edi, ebp respectively.
 *** ELF
 7f 45 4c 46
 *** [[http://www.muppetlabs.com/~breadbox/software/tiny/][Small ELF programs]]
 *** [[http://www.cirosantilli.com/elf-hello-world/][Elf hello world]]
-
 ** SC - c as s-expressions
 sc: http://sph.mn/content/3d3
 ** RNRS
@@ -118,3 +153,22 @@ http://armpit.sourceforge.net/
 http://common-lisp.net/project/movitz/movitz.html
 
 <civodul> janneke: https://github.com/namin/inc looks interesting  [15:18]
+** Orians Jeremiah
+<OriansJ> janneke: also, if you look at
+          https://github.com/oriansj/stage0/tree/master/stage2/High_level_prototypes
+          [the garbage collected lisp I implemented], if there are any pieces
+          I could add to finish off your mes lisp bootstrap just let me know
+          because I would be more than happy to do that :D
+<janneke> OriansJ: that's what I'm hoping for, that our efforts can be
+          complementary and we can work together
+*** lfam (~lfam@2601:47:4180:2ffb:7c05:17de:cf5f:23ef) has quit: Ping timeout:
+    246 seconds  [00:22]
+<janneke> exciting times!  [00:23]
+<janneke> OriansJ: i looked a few times and saw 'LISP empty', so thanks for
+          the pointer!  [00:24]
+<civodul> OriansJ, janneke: from that page, there's also:
+          https://web.archive.org/web/20160604035203fw_/http://homepage.ntlworld.com/edmund.grimley-evans/bcompiler.html
+
+** C4/C500
+https://web.archive.org/web/20160604041431/http://homepage.ntlworld.com/edmund.grimley-evans/cc500/cc500.c
+https://github.com/rswier/c4/blob/master/c4.c
index 8082efb6a197057f8683a31527f896cc14da9b0c..65a64af56fedde91595059083a32c8703db3fbdd 100644 (file)
  * along with Mes.  If not, see <http://www.gnu.org/licenses/>.
  */
 
-#define GNU 0
-// #if __GNUC__
-// #include "mlibc.c"
-// #endif
-
 int
-//main ()
 main (int argc, char *argv[])
 {
-  //puts ("Hi Mes!\n");
-  //if (argc > 1 && !strcmp (argv[1], "--help")) return puts ("argc > 1 && --help\n");
   if (argc > 1) return argc;
   return 42;
 }
-
-// #if __GNUC__
-// #include "mstart.c"
-// #endif
diff --git a/scaffold/hello.c b/scaffold/hello.c
new file mode 100644 (file)
index 0000000..cd1840a
--- /dev/null
@@ -0,0 +1,35 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * Mes --- Maxwell Equations of Software
+ * Copyright © 2016,2017 Jan Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of Mes.
+ *
+ * Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+#if __GNUC__
+#include "mlibc.c"
+#endif
+
+int
+main (int argc, char *argv[])
+{
+  puts ("Hi Mes!\n");
+  if (argc > 1 && !strcmp (argv[1], "--help")) {puts ("argc > 1 && --help\n"); return argc;}
+  return 42;
+}
+
+#if __GNUC__
+#include "mstart.c"
+#endif
index 6304c0ea412b343adebb6b893879411e459cb3e1..1adce349bee9490236c69afa5a692ab2f3c11f5a 100644 (file)
@@ -63,7 +63,8 @@ main (int argc, char *argv[])
   //if (getenv ("MES_ARENA")) ARENA_SIZE = atoi (getenv ("MES_ARENA"));
 
   if (argc > 1 && !strcmp (argv[1], "--help")) return eputs ("Usage: mes [--dump|--load] < FILE\n");
-  if (argc > 1 && !strcmp (argv[1], "--version")) {eputs ("Mes ");eputs (VERSION);return eputs ("\n");};
+  //FIXME: Nyacc on mes barfs: unhandled exception: not-a-pair (("0.4" . car))
+  //if (argc > 1 && !strcmp (argv[1], "--version")) {eputs ("Mes ");eputs (VERSION);return eputs ("\n");};
 
 #if __GNUC__
   g_stdin = STDIN;