Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
18
Task/String-comparison/PicoLisp/string-comparison.l
Normal file
18
Task/String-comparison/PicoLisp/string-comparison.l
Normal file
|
|
@ -0,0 +1,18 @@
|
|||
(setq
|
||||
str= =
|
||||
str< <
|
||||
str> > )
|
||||
|
||||
(println
|
||||
(str= (lowc "Foo") (lowc "foo") (lowc "fOO"))
|
||||
(str= "f" "foo")
|
||||
(str= "foo" "foo" "foo")
|
||||
(str= "" "") )
|
||||
|
||||
(println
|
||||
(str< "abc" "def")
|
||||
(str> "abc" "def")
|
||||
(str< "" "")
|
||||
(str< "12" "45") )
|
||||
|
||||
(bye)
|
||||
Loading…
Add table
Add a link
Reference in a new issue