sideways_super.exs

defmodule Foo do
	defmacro __using__(_) do
		quote do
			def foo() do
				IO.puts "Foo"
			end
			defoverridable [foo: 0]
		end
	end
end

defmodule Bar do
	defmacro __using__(_) do
		quote do
			defmacro try_super(args) do
				if Module.overridable?(__CALLER__.module, __CALLER__.function) do
					quote do: {:ok, super(unquote_splicing(args))}
				else
					:error
				end
			end

			def foo() do
				IO.puts "Baz start"
				try_super([])
				IO.puts "Baz end"
			end
			defoverridable [foo: 0]
		end
	end
end

defmodule Test1 do
	use Foo
	use Bar
end

IO.puts "\nTest with a super"
Test1.foo
# Baz start
# Foo
# Baz end


defmodule Test2 do
	use Bar
end

IO.puts "\nTest without a super"
Test2.foo
# Baz start
# Baz end