gnue/gnue-config/test gcd_pass_test.gcd

[Reinhard Mueller]

CVSROOT:        /cvsroot/gnue
Module name:    gnue
Changes by:     Reinhard Mueller <address@hidden>       01/11/15 15:07:22

Modified files:
        gnue-config/test: gcd_pass_test.gcd 

Log message:
        Changed syntax for explicit REFERENCE and LIST to fit new parser code.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/gnue/gnue/gnue-config/test/gcd_pass_test.gcd.diff?tr1=1.4&tr2=1.5&r1=text&r2=text

Patches:
Index: gnue/gnue-config/test/gcd_pass_test.gcd
diff -u gnue/gnue-config/test/gcd_pass_test.gcd:1.4 
gnue/gnue-config/test/gcd_pass_test.gcd:1.5
--- gnue/gnue-config/test/gcd_pass_test.gcd:1.4 Tue Sep 25 09:56:42 2001
+++ gnue/gnue-config/test/gcd_pass_test.gcd     Thu Nov 15 15:07:22 2001
@@ -23,7 +23,7 @@
 #
 # This file originally written by Neil Tiffin (address@hidden).
 #
-# $Revision: 1.4 $ $Date: 2001/09/25 13:56:42 $ $Author: ntiffin $
+# $Revision: 1.5 $ $Date: 2001/11/15 20:07:22 $ $Author: reinhard $
 #
 
 module mod1
@@ -57,8 +57,6 @@
       bool       bool_fld;
       
       mod1::type1      t;
-      
-      list list_fld : mod1::c(code) = this.char_8_fld;
 
       # concatenate a and b together to check
       # arg passing
@@ -76,7 +74,12 @@
   class c
     {
       char       code<8>;
-      reference ref_fld : mod1::class1(char_8_fld) = this.code;
+      reference ref_fld WHERE mod1::class1.char_8_fld = code;
+    };
+
+  extend class1
+    {
+      list list_fld WHERE mod1::c.code = char_8_fld;
     };
 
   class class3