18 lines
481 B
Plaintext
18 lines
481 B
Plaintext
( ( MyFunction
|
|
= someText XMLstuff
|
|
. ( get$!arg:?someText
|
|
& get$("CorporateData.xml",X,ML):?XMLstuff
|
|
| out
|
|
$ ( str
|
|
$ ( "Something went wrong when reading your file \""
|
|
!arg
|
|
"\". Or was it the Corporate Data? Hard to say. Anyhow, now I throw you out."
|
|
)
|
|
)
|
|
& ~
|
|
)
|
|
& contemplate$(!someText,!XMLstuff)
|
|
)
|
|
& MyFunction$"Tralula.txt"
|
|
);
|