Same fringe: Difference between revisions

(→‎{{header|Perl 6}}: oops, forgot to remove one line)
(→‎{{header|Clojure}}: slight tweak)
Line 520:
(and (empty? s1) (empty? s2)) true
(not= (empty? s1) (empty? s2)) false
(= (first s1) (first s2)) (recur (rest s1) (rest s2))
:else false))</lang>
(if (= (first s1) (first s2))
(recur (rest s1) (rest s2))
false)))</lang>
 
=={{header|D}}==
Anonymous user