@ -586,7 +586,9 @@ function(to_yaml in_json level yaml genex)
@@ -586,7 +586,9 @@ function(to_yaml in_json level yaml genex)
string ( REPLACE "\n" "\n${indent_${level}} " indent_yaml "${non_indent_yaml}" )
set ( ${ yaml } "${${yaml}}${indent_${level}} - ${indent_yaml}\n" )
else ( )
set ( ${ yaml } "${${yaml}}${indent_${level}} - ${item}\n" )
# A s s u m e a s t r i n g , e s c a p e s i n g l e q u o t e s .
string ( REPLACE "'" "''" item "${item}" )
set ( ${ yaml } "${${yaml}}${indent_${level}} - '${item}'\n" )
endif ( )
endforeach ( )
endif ( )
@ -595,10 +597,12 @@ function(to_yaml in_json level yaml genex)
@@ -595,10 +597,12 @@ function(to_yaml in_json level yaml genex)
# - w i t h u n e x p a n d e d g e n e r a t o r e x p r e s s i o n s : s a v e a s Y A M L c o m m e n t
# - i f i t m a t c h e s t h e s p e c i a l p r e f i x : c o n v e r t t o Y A M L l i s t
# - o t h e r w i s e : s a v e a s Y A M L s c a l a r
# S i n g l e q u o t e s m u s t b e e s c a p e d i n t h e v a l u e .
string ( REPLACE "'" "''" subjson "${subjson}" )
if ( subjson MATCHES "\\$<.*>" AND ${ genex } )
# Y e t u n e x p a n d e d g e n e r a t o r e x p r e s s i o n : s a v e a s c o m m e n t
string ( SUBSTRING ${ indent_${level } } 1 -1 short_indent )
set ( ${ yaml } "${${yaml}}#${short_indent}${member}: ${subjson}\n" )
set ( ${ yaml } "${${yaml}}#${short_indent}${member}: ' ${subjson}' \n" )
elseif ( subjson MATCHES "^@YAML-LIST@" )
# L i s t - a s - s t r i n g : c o n v e r t t o l i s t
set ( ${ yaml } "${${yaml}}${indent_${level}}${member}:" )
@ -608,12 +612,12 @@ function(to_yaml in_json level yaml genex)
@@ -608,12 +612,12 @@ function(to_yaml in_json level yaml genex)
else ( )
set ( ${ yaml } "${${yaml}}\n" )
foreach ( item ${ subjson } )
set ( ${ yaml } "${${yaml}}${indent_${level}} - ${item}\n" )
set ( ${ yaml } "${${yaml}}${indent_${level}} - ' ${item}' \n" )
endforeach ( )
endif ( )
else ( )
# R a w s t r i n g s : s a v e a s i s
set ( ${ yaml } "${${yaml}}${indent_${level}}${member}: ${subjson}\n" )
set ( ${ yaml } "${${yaml}}${indent_${level}}${member}: ' ${subjson}' \n" )
endif ( )
else ( )
# O t h e r J S O N d a t a t y p e - > Y A M L s c a l a r , a s - i s