Hash join: Difference between revisions
Content added Content deleted
(→{{header|LFE}}: Added LFE implementation) |
m (→{{header|LFE}}: Added missing data definitions) |
||
Line 686: | Line 686: | ||
</lang> |
</lang> |
||
Table definitions: in the LFE REPL: |
|||
<lang lisp> |
|||
> (set ss '((#(age 27) #(name "Jonah")) |
|||
(#(age 18) #(name "Alan")) |
|||
(#(age 28) #(name "Glory")) |
|||
(#(age 18) #(name "Popeye")) |
|||
(#(age 28) #(name "Alan")))) |
|||
> (set rs '((#(nemesis "Whales") #(name "Jonah")) |
|||
(#(nemesis "Spiders") #(name "Jonah")) |
|||
(#(nemesis "Ghosts") #(name "Alan")) |
|||
(#(nemesis "Zombies") #(name "Alan")) |
|||
(#(nemesis "Buffy") #(name "Glory")))) |
|||
</lang> |
|||
Output in LFE REPL: |
|||
<lang lisp> |
<lang lisp> |
||
> (hash-join ss 'name rs 'name) |
> (hash-join ss 'name rs 'name) |