Merge pull request #500 from lucdw/master

line continuation after any lavaan operator in lav_syntax_parser

Author: yrosseel

R/lav_syntax_parser.R

@@ -303,7 +303,8 @@ lav_parse_text_tokens <- function(modelsrc, types) {
     if (elem.type[i] == types$identifier && elem.text[i] == "efa") {
       frm.hasefa <- TRUE
     }
-    if (any(elem.text[i] == c("+", "*", "=~", "-"))) {
+    if (any(elem.text[i] == 
+      c("+", "*", "=~", "-", "<~", "~*~", "~~", "~", "|~", "|", "%"))) {
       if (frm.incremented) {
         frm.number <- frm.number - 1L
         elem.formula.number[i] <- frm.number