lci/test/1.4-Tests/13-Bindings/1-stdio/2-fread/test.lol

20 lines
407 B
Plaintext

HAI 1.4
CAN HAS STDIO?
I HAS A file
file R I IZ STDIO'Z OPEN YR "read.dat" AN YR "r" MKAY
I HAS A var
var R I IZ STDIO'Z LUK YR file AN YR 45 MKAY
VISIBLE var
I HAS A var2
var2 R I IZ STDIO'Z LUK YR file AN YR 1 MKAY
VISIBLE var2 AN " - " AN "::"
BOTH SAEM var2 AN "::", O RLY?
YA RLY
VISIBLE "success"
NO WAI
VISIBLE "fail"
OIC
KTHXBYE