]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/parser.yy
* lily/text-item.cc (text_to_molecule): new function
[lilypond.git] / lily / parser.yy
index bb919029b69a775cfa09fd981f6cb162627bcb91..204426ae8a441a6307bf2b71b2b313087e0e7e33 100644 (file)
@@ -2215,3 +2215,33 @@ My_lily_lexer::try_special_identifiers (SCM * destination, SCM sid)
        }
        return -1;      
 }
+#if 0
+
+markup:
+       STRING {
+               $$ = scm_list_n (scm_c_eval_string ("simple-markup"), $1, SCM_UNDEFINED);
+       }
+       | MARKUP_HEAD0 markup
+       | MARKUP_HEAD1 SCM_T markup
+       | MARKUP_HEAD2 markup
+       | MARKUP_LIST_HEAD 
+       | MARKUP_LIST_HEAD 
+       | markup_list {
+               $$ = $1 
+       ;
+
+markup_list:
+       '<' markup_list_body '>' { $$ = scm_reverse_x ($1, SCM_EOL); }
+       ;
+
+markup_line:
+       '{' markup_list_body '}' { $$ = .. scm_reverse_x ($1, SCM_EOL); }
+       
+       ;
+markup_list_body:
+       /**/ {  $$ = SCM_EOL; }
+       markup_list_body markup {
+               $$ = gh_cons ($2, $1) ;
+       }
+       ;
+#endif