8 lines
207 B
Text
8 lines
207 B
Text
(load "@lib/http.l")
|
|
|
|
(in "text.csv"
|
|
(<table> 'myStyle NIL NIL
|
|
(prinl)
|
|
(while (split (line) ",")
|
|
(<row> NIL (ht:Prin (pack (car @))) (ht:Prin (pack (cadr @))))
|
|
(prinl) ) ) )
|