From a4194501fe2c60a19160c811c1a7818da5ce715e Mon Sep 17 00:00:00 2001 From: "kr.angelov" Date: Wed, 30 Oct 2013 14:42:29 +0000 Subject: linref is now used by the linearizer. The visible change is that the 'l' command in the shell now can linearize discontinuous phrases --- src/server/PGFService.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'src/server') diff --git a/src/server/PGFService.hs b/src/server/PGFService.hs index fcda86e7c..1f4e2bdce 100644 --- a/src/server/PGFService.hs +++ b/src/server/PGFService.hs @@ -601,9 +601,9 @@ linearizeTabular pgf tos tree = vs = concat (PGF.tabularLinearizes pgf to t) linearizeAndBind pgf mto tree = - [(to,s,bs) | to<-langs, - let bs = PGF.bracketedLinearize pgf to (transfer to tree) - s = unwords . bind $ PGF.flattenBracketedString bs] + [(to,s,bss) | to<-langs, + let bss = PGF.bracketedLinearize pgf to (transfer to tree) + s = unwords . bind $ concatMap PGF.flattenBracketedString bss] where langs = if null mto then PGF.languages pgf else mto -- cgit v1.2.3