annotate core/src/luan/modules/which.luan @ 628:6510de302f95

add "which" command
author Franklin Schmidt <fschmidt@gmail.com>
date Mon, 18 Jan 2016 06:42:50 -0700
parents
children ca169567ce07
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
628
6510de302f95 add "which" command
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
1 local Luan = require "luan:Luan"
6510de302f95 add "which" command
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
2 local error = Luan.error
6510de302f95 add "which" command
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
3 local values = Luan.values or error()
6510de302f95 add "which" command
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
4 local Which_mod = require "luan:Which_mod"
6510de302f95 add "which" command
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
5 local which = Which_mod.which or error()
6510de302f95 add "which" command
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
6
6510de302f95 add "which" command
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
7 for name in values(...) do
6510de302f95 add "which" command
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
8 which(name)
6510de302f95 add "which" command
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
9 end