Cool!

Noury
On Sep 18 2023, at 5:20 pm, stephane ducasse <stephane.ducasse@inria.fr> wrote:
In a Phep005 soon available

testLiteralSet

| compiler |
compiler := OpalCompiler new.
compiler compilationContext parserClass: RBParserLiteralCollection.
self assert: (compiler evaluate:
'{ :Set 1 . 2 . 1}' )

equals: #(1 2) asSet.



testOrderedCollection

| compiler |
compiler := OpalCompiler new.
compiler compilationContext parserClass: RBParserLiteralCollection.
self assert: (compiler evaluate:
'{ :OrderedCollection 1 . 2 . 1 . 3}' )

equals: #(1 2 1 3) asOrderedCollection.


testDictionary

| compiler dict |
compiler := OpalCompiler new.
compiler compilationContext parserClass: RBParserLiteralCollection.
dict := (compiler evaluate:
'{ :Dictionary #a -> 33 . #b -> 44}' ).
self assert: (dict at: #a) equals: 33