﻿⍝ Ticker Plant Demo
)load isolate
]load c:\dropbox\dyalog15\futiso\TickerPlant
isolate.Config'listen'1
isolate.Config'onerror' 'debug'
isolate.Reset 0
TickerPlant.Init
tp1←ø TickerPlant
tp2←ø TickerPlant
z←tp1.Server 'msft'
z←tp2.Server 'aapl'
⍝ Look at intentional errors in TickerPlant
TickerPlant.END←1
)erase tp1 tp2
