From 37760cb24c2e0c3b7e13d2c531afd8f2b9174e6d Mon Sep 17 00:00:00 2001 From: bringert Date: Sun, 7 Jan 2007 17:18:50 +0000 Subject: [PATCH] JavaSscript and SISR abstract syntax now uses an array for the node children, instead of cheesy argN fields. --- src/GF/Speech/SISR.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/GF/Speech/SISR.hs b/src/GF/Speech/SISR.hs index b74b44076..9e926c72f 100644 --- a/src/GF/Speech/SISR.hs +++ b/src/GF/Speech/SISR.hs @@ -82,7 +82,7 @@ field x y = JS.EMember x (JS.Ident y) ass = JS.EAssign -tree n xs = obj $ [("name", JS.EStr n)] ++ [("arg"++show i, x) | (i,x) <- zip [0..] xs] +tree n xs = obj [("name", JS.EStr n), ("children", JS.EArray xs)] obj ps = JS.EObj [JS.Prop (JS.Ident x) y | (x,y) <- ps]