forked from HEL/chronos
		
	added lifeline-style
This commit is contained in:
		| @@ -10,10 +10,12 @@ | ||||
|   color: black, | ||||
|   flip: false, | ||||
|   enable-dst: false, | ||||
|   create-dst: false, | ||||
|   disable-dst: false, | ||||
|   destroy-dst: false, | ||||
|   disable-src: false, | ||||
|   destroy-src: false, | ||||
|   lifeline-style: auto | ||||
| ) = { | ||||
|   return (( | ||||
|     type: "seq", | ||||
| @@ -25,10 +27,12 @@ | ||||
|     color: color, | ||||
|     flip: flip, | ||||
|     enable-dst: enable-dst, | ||||
|     create-dst: create-dst, | ||||
|     disable-dst: disable-dst, | ||||
|     destroy-dst: destroy-dst, | ||||
|     disable-src: disable-src, | ||||
|     destroy-src: destroy-src, | ||||
|     lifeline-style: lifeline-style, | ||||
|   ),) | ||||
| } | ||||
|  | ||||
| @@ -45,7 +49,7 @@ | ||||
|   if elmt.disable-src { | ||||
|     let src-line = lifelines.at(i1) | ||||
|     src-line.level -= 1 | ||||
|     src-line.lines.push(("disable", y, auto)) | ||||
|     src-line.lines.push(("disable", y)) | ||||
|     lifelines.at(i1) = src-line | ||||
|   } | ||||
|   if elmt.destroy-src { | ||||
| @@ -142,7 +146,12 @@ | ||||
|   } | ||||
|   if elmt.enable-dst { | ||||
|     let dst-line = lifelines.at(i2) | ||||
|     dst-line.lines.push(("enable", y, auto)) | ||||
|     dst-line.lines.push(("enable", y, elmt.lifeline-style)) | ||||
|     lifelines.at(i2) = dst-line | ||||
|   } | ||||
|   if elmt.create-dst { | ||||
|     let dst-line = lifelines.at(i2) | ||||
|     dst-line.lines.push(("create", y)) | ||||
|     lifelines.at(i2) = dst-line | ||||
|   } | ||||
|   y -= Y-SPACE | ||||
|   | ||||
		Reference in New Issue
	
	Block a user