⍝ Run test script: no news => good news.

    nl←⎕ucs 13

    scripts.test←'    ''good'',2↓''no news''',nl,'good news'

    scripts.test
    'good',2↓'no news'
good news             

    'hello                        
       planet                     
       earth'~' '    ⍝ multi-line char vec '
hello 
planet
earth 

    alpha←Alpha         ⍝ avoid cycle in script-refs code
    ⊢alpha test'test'
1
    {a←1 ⋄ ⍵}1
1
    +/'disp' 'display' ⍷ 'l'test''  ⍝ list returns vector of char vectors.
1

⍝∇ test scripts.disp scripts.display

Back to: code

Back to: Workspaces