-
Notifications
You must be signed in to change notification settings - Fork 1
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
- Loading branch information
1 parent
2696b66
commit 49ae136
Showing
36 changed files
with
1,691 additions
and
1,691 deletions.
There are no files selected for viewing
This file was deleted.
Oops, something went wrong.
This file was deleted.
Oops, something went wrong.
32 changes: 32 additions & 0 deletions
32
repository/BaselineOfOpenPonkXMI/BaselineOfOpenPonkXMI.class.st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,32 @@ | ||
" | ||
Baseline for https://github.com/OpenPonk/xmi | ||
" | ||
Class { | ||
#name : 'BaselineOfOpenPonkXMI', | ||
#superclass : 'BaselineOf', | ||
#category : 'BaselineOfOpenPonkXMI', | ||
#package : 'BaselineOfOpenPonkXMI' | ||
} | ||
|
||
{ #category : 'baselines' } | ||
BaselineOfOpenPonkXMI >> baseline: spec [ | ||
|
||
<baseline> | ||
spec for: #common do: [ | ||
spec | ||
baseline: 'OpenPonkXMLDOMVisitor' | ||
with: [ | ||
spec repository: 'github://OpenPonk/xml-dom-visitor' ]. | ||
spec baseline: 'XMLWriter' with: [ | ||
spec | ||
loads: #( 'Core' ); | ||
repository: | ||
'github://pharo-contributions/XML-XMLWriter:v3.1.x' ]. | ||
spec | ||
package: 'OpenPonk-XMI' | ||
with: [ spec requires: #( 'OpenPonkXMLDOMVisitor' 'XMLWriter' ) ]. | ||
spec | ||
package: 'OpenPonk-XMI-Inspection' | ||
with: [ spec requires: #( 'OpenPonk-XMI' ) ]. | ||
spec group: 'default' with: #( 'OpenPonk-XMI' 'OpenPonk-XMI-Inspection' ) ] | ||
] |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1 @@ | ||
Package { #name : 'BaselineOfOpenPonkXMI' } |
This file was deleted.
Oops, something went wrong.
This file was deleted.
Oops, something went wrong.
12 changes: 6 additions & 6 deletions
12
...MI-GTExtensions/OPXMIElement.extension.st → ...-XMI-Inspection/OPXMIElement.extension.st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -1,6 +1,6 @@ | ||
Extension { #name : 'OPXMIElement' } | ||
|
||
{ #category : '*OP-XMI-GTExtensions' } | ||
OPXMIElement >> writeXMLOn: aWriter [ | ||
aWriter tag: self xmiName | ||
] | ||
Extension { #name : 'OPXMIElement' } | ||
|
||
{ #category : '*OpenPonk-XMI-Inspection' } | ||
OPXMIElement >> writeXMLOn: aWriter [ | ||
aWriter tag: self xmiName | ||
] |
30 changes: 15 additions & 15 deletions
30
...-GTExtensions/OPXMIInfoItems.extension.st → ...MI-Inspection/OPXMIInfoItems.extension.st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -1,15 +1,15 @@ | ||
Extension { #name : 'OPXMIInfoItems' } | ||
|
||
{ #category : '*OP-XMI-GTExtensions' } | ||
OPXMIInfoItems >> treeViewLabelText [ | ||
^ self asHighlightedTextWrittenWith: [ :writer | self writeTreeViewLabelXMLOn: writer ] | ||
] | ||
|
||
{ #category : '*OP-XMI-GTExtensions' } | ||
OPXMIInfoItems >> writeTreeViewLabelXMLOn: aWriter [ | ||
self writeXMLOn: aWriter | ||
] | ||
|
||
{ #category : '*OP-XMI-GTExtensions' } | ||
OPXMIInfoItems >> writeXMLOn: aWriter [ | ||
] | ||
Extension { #name : 'OPXMIInfoItems' } | ||
|
||
{ #category : '*OpenPonk-XMI-Inspection' } | ||
OPXMIInfoItems >> treeViewLabelText [ | ||
^ self asHighlightedTextWrittenWith: [ :writer | self writeTreeViewLabelXMLOn: writer ] | ||
] | ||
|
||
{ #category : '*OpenPonk-XMI-Inspection' } | ||
OPXMIInfoItems >> writeTreeViewLabelXMLOn: aWriter [ | ||
self writeXMLOn: aWriter | ||
] | ||
|
||
{ #category : '*OpenPonk-XMI-Inspection' } | ||
OPXMIInfoItems >> writeXMLOn: aWriter [ | ||
] |
54 changes: 27 additions & 27 deletions
54
...xtensions/OPXMIObjectElement.extension.st → ...nspection/OPXMIObjectElement.extension.st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -1,27 +1,27 @@ | ||
Extension { #name : 'OPXMIObjectElement' } | ||
|
||
{ #category : '*OP-XMI-GTExtensions' } | ||
OPXMIObjectElement >> inspectionProperties [ | ||
|
||
"<inspectorPresentationOrder: 5 title: 'Tree'>" | ||
^ SpTreePresenter new | ||
roots: { self }; | ||
children: [ :each | | ||
each isObjectElement | ||
ifTrue: [ each containedItems ] | ||
ifFalse: [ | ||
each isReferenceItem | ||
ifTrue: [ each referencedElements ] | ||
ifFalse: [ #( ) ] ] ]; | ||
display: [ :each | each treeViewLabelText ]; | ||
yourself | ||
] | ||
|
||
{ #category : '*OP-XMI-GTExtensions' } | ||
OPXMIObjectElement >> writeXMLOn: aWriter [ | ||
aWriter | ||
tag: self xmiName | ||
attributes: | ||
({#xmi:id -> self xmiId. | ||
#xmi:type -> self xmiType} select: [:pair | pair value isNotNil]) | ||
] | ||
Extension { #name : 'OPXMIObjectElement' } | ||
|
||
{ #category : '*OpenPonk-XMI-Inspection' } | ||
OPXMIObjectElement >> inspectionProperties [ | ||
|
||
"<inspectorPresentationOrder: 5 title: 'Tree'>" | ||
^ SpTreePresenter new | ||
roots: { self }; | ||
children: [ :each | | ||
each isObjectElement | ||
ifTrue: [ each containedItems ] | ||
ifFalse: [ | ||
each isReferenceItem | ||
ifTrue: [ each referencedElements ] | ||
ifFalse: [ #( ) ] ] ]; | ||
display: [ :each | each treeViewLabelText ]; | ||
yourself | ||
] | ||
|
||
{ #category : '*OpenPonk-XMI-Inspection' } | ||
OPXMIObjectElement >> writeXMLOn: aWriter [ | ||
aWriter | ||
tag: self xmiName | ||
attributes: | ||
({#xmi:id -> self xmiId. | ||
#xmi:type -> self xmiType} select: [:pair | pair value isNotNil]) | ||
] |
16 changes: 8 additions & 8 deletions
16
...ions/OPXMIReferenceAttribute.extension.st → ...tion/OPXMIReferenceAttribute.extension.st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -1,8 +1,8 @@ | ||
Extension { #name : 'OPXMIReferenceAttribute' } | ||
|
||
{ #category : '*OP-XMI-GTExtensions' } | ||
OPXMIReferenceAttribute >> writeXMLOn: aWriter [ | ||
aWriter | ||
tag: self xmiName | ||
with: [ self referencedElements do: [ :each | each writeXMLOn: aWriter ] ] | ||
] | ||
Extension { #name : 'OPXMIReferenceAttribute' } | ||
|
||
{ #category : '*OpenPonk-XMI-Inspection' } | ||
OPXMIReferenceAttribute >> writeXMLOn: aWriter [ | ||
aWriter | ||
tag: self xmiName | ||
with: [ self referencedElements do: [ :each | each writeXMLOn: aWriter ] ] | ||
] |
16 changes: 8 additions & 8 deletions
16
...nsions/OPXMIReferenceElement.extension.st → ...ection/OPXMIReferenceElement.extension.st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -1,8 +1,8 @@ | ||
Extension { #name : 'OPXMIReferenceElement' } | ||
|
||
{ #category : '*OP-XMI-GTExtensions' } | ||
OPXMIReferenceElement >> writeXMLOn: aWriter [ | ||
href | ||
ifNil: [ aWriter tag: self xmiName ] | ||
ifNotNil: [ aWriter tag: self xmiName attributes: {#href -> href} ] | ||
] | ||
Extension { #name : 'OPXMIReferenceElement' } | ||
|
||
{ #category : '*OpenPonk-XMI-Inspection' } | ||
OPXMIReferenceElement >> writeXMLOn: aWriter [ | ||
href | ||
ifNil: [ aWriter tag: self xmiName ] | ||
ifNotNil: [ aWriter tag: self xmiName attributes: {#href -> href} ] | ||
] |
12 changes: 6 additions & 6 deletions
12
...tensions/OPXMIValueAttribute.extension.st → ...spection/OPXMIValueAttribute.extension.st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -1,6 +1,6 @@ | ||
Extension { #name : 'OPXMIValueAttribute' } | ||
|
||
{ #category : '*OP-XMI-GTExtensions' } | ||
OPXMIValueAttribute >> writeXMLOn: aWriter [ | ||
aWriter tag: self xmiName with: self value | ||
] | ||
Extension { #name : 'OPXMIValueAttribute' } | ||
|
||
{ #category : '*OpenPonk-XMI-Inspection' } | ||
OPXMIValueAttribute >> writeXMLOn: aWriter [ | ||
aWriter tag: self xmiName with: self value | ||
] |
12 changes: 6 additions & 6 deletions
12
...Extensions/OPXMIValueElement.extension.st → ...Inspection/OPXMIValueElement.extension.st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -1,6 +1,6 @@ | ||
Extension { #name : 'OPXMIValueElement' } | ||
|
||
{ #category : '*OP-XMI-GTExtensions' } | ||
OPXMIValueElement >> writeXMLOn: aWriter [ | ||
aWriter tag: self xmiName with: self value | ||
] | ||
Extension { #name : 'OPXMIValueElement' } | ||
|
||
{ #category : '*OpenPonk-XMI-Inspection' } | ||
OPXMIValueElement >> writeXMLOn: aWriter [ | ||
aWriter tag: self xmiName with: self value | ||
] |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1 @@ | ||
Package { #name : 'OpenPonk-XMI-Inspection' } |
60 changes: 30 additions & 30 deletions
60
repository/OP-XMI/OPXMIAttribute.class.st → ...tory/OpenPonk-XMI/OPXMIAttribute.class.st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -1,30 +1,30 @@ | ||
Class { | ||
#name : 'OPXMIAttribute', | ||
#superclass : 'OPXMIInfoItems', | ||
#instVars : [ | ||
'xmiName' | ||
], | ||
#category : 'OP-XMI-DOM', | ||
#package : 'OP-XMI', | ||
#tag : 'DOM' | ||
} | ||
|
||
{ #category : 'testing' } | ||
OPXMIAttribute class >> isAbstract [ | ||
^ self = OPXMIAttribute | ||
] | ||
|
||
{ #category : 'testing' } | ||
OPXMIAttribute >> isAttribute [ | ||
^ true | ||
] | ||
|
||
{ #category : 'accessing' } | ||
OPXMIAttribute >> xmiName [ | ||
^ xmiName | ||
] | ||
|
||
{ #category : 'accessing' } | ||
OPXMIAttribute >> xmiName: aString [ | ||
xmiName := aString | ||
] | ||
Class { | ||
#name : 'OPXMIAttribute', | ||
#superclass : 'OPXMIInfoItems', | ||
#instVars : [ | ||
'xmiName' | ||
], | ||
#category : 'OpenPonk-XMI-DOM', | ||
#package : 'OpenPonk-XMI', | ||
#tag : 'DOM' | ||
} | ||
|
||
{ #category : 'testing' } | ||
OPXMIAttribute class >> isAbstract [ | ||
^ self = OPXMIAttribute | ||
] | ||
|
||
{ #category : 'testing' } | ||
OPXMIAttribute >> isAttribute [ | ||
^ true | ||
] | ||
|
||
{ #category : 'accessing' } | ||
OPXMIAttribute >> xmiName [ | ||
^ xmiName | ||
] | ||
|
||
{ #category : 'accessing' } | ||
OPXMIAttribute >> xmiName: aString [ | ||
xmiName := aString | ||
] |
60 changes: 30 additions & 30 deletions
60
repository/OP-XMI/OPXMIElement.class.st → ...sitory/OpenPonk-XMI/OPXMIElement.class.st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -1,30 +1,30 @@ | ||
Class { | ||
#name : 'OPXMIElement', | ||
#superclass : 'OPXMIInfoItems', | ||
#instVars : [ | ||
'xmiName' | ||
], | ||
#category : 'OP-XMI-DOM', | ||
#package : 'OP-XMI', | ||
#tag : 'DOM' | ||
} | ||
|
||
{ #category : 'testing' } | ||
OPXMIElement class >> isAbstract [ | ||
^ self = OPXMIElement | ||
] | ||
|
||
{ #category : 'testing' } | ||
OPXMIElement >> isElement [ | ||
^ true | ||
] | ||
|
||
{ #category : 'accessing' } | ||
OPXMIElement >> xmiName [ | ||
^ xmiName | ||
] | ||
|
||
{ #category : 'accessing' } | ||
OPXMIElement >> xmiName: aString [ | ||
xmiName := aString | ||
] | ||
Class { | ||
#name : 'OPXMIElement', | ||
#superclass : 'OPXMIInfoItems', | ||
#instVars : [ | ||
'xmiName' | ||
], | ||
#category : 'OpenPonk-XMI-DOM', | ||
#package : 'OpenPonk-XMI', | ||
#tag : 'DOM' | ||
} | ||
|
||
{ #category : 'testing' } | ||
OPXMIElement class >> isAbstract [ | ||
^ self = OPXMIElement | ||
] | ||
|
||
{ #category : 'testing' } | ||
OPXMIElement >> isElement [ | ||
^ true | ||
] | ||
|
||
{ #category : 'accessing' } | ||
OPXMIElement >> xmiName [ | ||
^ xmiName | ||
] | ||
|
||
{ #category : 'accessing' } | ||
OPXMIElement >> xmiName: aString [ | ||
xmiName := aString | ||
] |
Oops, something went wrong.