Closed Sorien closed 7 years ago
code blocks below are valid
type TPairs<TKey, TValue> = class(TList<TPair<TKey, TValue>>) // TPair unexpected, ';' expected got ')' TPriorityPair<TKey, TValue, TPriority> = record // ',' unexpected Key: TKey; Value: TValue; Priority: TPriority; end; TPriorityPairs<TKey, TValue, TPriority> = class(TList<TPriorityPair<TKey, TValue, TPriority>>)
whole unit at https://gist.github.com/Sorien/8884e403f6caeb301a525f24e521b54f
code blocks below are valid
whole unit at https://gist.github.com/Sorien/8884e403f6caeb301a525f24e521b54f