Probably one or two bugs here
you should call it like:
Fntb 'Fntb'
it give a syntax error, fine, so I added a 8 QuadCR (something) and it now
abort (core dump)
)load bug
loading )DUMP file /home/xtian/workspaces/bug.apl...
WAS CLEAR WS
Fntb 'Fntb'
18 96
SYNTAX ERROR
Fntb[10] (line rect)←1 split rect
^ ^
]boxing 8
line
┌→───────────────────────────────────────────────────────────────────────────────────────────────┐
│Z←Fntb function_name;⎕io;rect;split;line
│
└────────────────────────────────────────────────────────────────────────────────────────────────┘
rect
┌→───────────────────────────────────────────────────────────────────────────────────────────────┐
↓⍝
│
│⍝ Remove all trailing blanks from a ⎕cr function_name
│
│⍝ so it will be easy to cut & paste from linux to winblows
│
│⍝
│
│⎕io←1
│
│Z←0⍴''
│
│rect←⎕cr function_name
│
│split←{(,1↑[⍺]⍵) (1↓[⍺]⍵)}
│
│Loop:
│
│→(0=1↑⍴ rect)/reshape
│
│⍴ rect ⍝ for debugging purpose
│
│⍝ 8 ⎕cr (t←1 split rect) ⍝ Added this line for debug purpose and interpretor
aborted core dump│
│(line rect) ← 1 split rect ⍝ First problem, this line give a syntax error
│
│⍝ TODO: effectively remove trailing blanks from "line" before appending to "Z"
│
│Z←Z,⊂line
│
│→Loop
│
│reshape:
│
└────────────────────────────────────────────────────────────────────────────────────────────────┘
)sil
Fntb[10]
⋆
as usual it may be a coding error on my part, but the "aborted core dump" is
quite unusual.
Xtian.