--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/deep-nested-struct.c	Sat Nov 26 11:36:16 2005 +0900
@@ -0,0 +1,72 @@
+// to test a deep-nested struct
+// this example tests a 2 nested struct
+#define NULL ((void*)0)
+struct nest1{
+    int i;
+    int j;
+    char k;
+};
+struct nest0{
+    int huga;
+    long hoge;
+    float aho;
+    struct nest1 n1;
+};
+struct nest{
+    char *str;
+    char *p;
+    void *env;
+    code (*ret)(int);
+    struct nest0 n0;
+};
+code
+dmpn2(code(*ret)(int), void *env)
+{
+    goto ret(0), env;
+}
+code
+dmpn1(struct nest1 *test1, code(*ret)(int), void *env)
+{
+    printf("dmpn1: %d %d %d\n",
+	   test1->i,
+	   test1->j,
+	   test1->k);
+    goto dmpn2(ret,env);
+}
+code
+dmpn0(struct nest0 *test0, code(*ret)(), void *env)
+{
+    printf("dmpn0: %d %ld %f\n",
+	   test0->huga,
+	   test0->hoge,
+	   test0->aho);
+    goto dmpn1(&(test0->n1), ret, env);
+}
+code
+dmpn(struct nest *test)
+{
+    printf("dmpn: %x %x\n", test->str, test->p);
+    goto dmpn0(&(test->n0), test->ret, test->env);
+}
+void
+dmp(struct nest *n)
+{
+    n->ret=return;
+    n->env=environment;
+    goto dmpn(n);
+}
+int
+main()
+{
+    struct nest test;
+    test.str=NULL;
+    test.p=NULL;
+    test.n0.huga=1;
+    test.n0.hoge=2;
+    test.n0.aho=3.0;
+    test.n0.n1.i=10;
+    test.n0.n1.j=20;
+    test.n0.n1.k=30;
+//    dmp(&test);
+    return(0);
+}