 
   test "unhandled stab" do
     assert_compile_fail CompileError,
-      "nofile:3: unhandled operator ->",
-      '''
-      defmodule Kernel.ErrorsTest.UnhandledStab do
-        def fun do
-          casea foo(), do: (bar -> baz)
-        end
-      end
-      '''
+      "nofile:1: unhandled operator ->",
+      '(bar -> baz)'
   end
 
   test "undefined non local function" do
     assert_compile_fail CompileError,
-      "nofile:1: undefined function casea/2",
-      'casea foo, do: @hello :world'
+      "nofile:1: undefined function call/2",
+      'call foo, do: :foo'
   end
 
   test "invalid attribute" do

  test "duplicated bitstring size" do
    assert_compile_fail CompileError,
      "nofile:1: duplicated size definition in bitstring",
      '<<1 :: size(12)-size(13)>>'
  end

  test "invalid bitstring specified" do
    assert_compile_fail CompileError,
      "nofile:1: unknown bitstring specifier :atom",
      '<<1 :: :atom>>'

    assert_compile_fail CompileError,
      "nofile:1: unknown bitstring specifier unknown()",
      '<<1 :: unknown>>'

    assert_compile_fail CompileError,
      "nofile:1: unknown bitstring specifier another(12)",
      '<<1 :: another(12)>>'

    assert_compile_fail CompileError,
      "nofile:1: size in bitstring expects an integer or a variable as argument, got: :a",
      '<<1 :: size(:a)>>'

    assert_compile_fail CompileError,
      "nofile:1: unit in bitstring expects an integer as argument, got: :x",
      '<<1 :: unit(:x)>>'
  end

  test "invalid alias" do

      'quote 1'
    assert_compile_fail CompileError,
      "nofile:1: invalid options for quote, expected a keyword list",
      'quote(:foo, do: foo)'
  end

  test "invalid calls" do
