anchor.diff:              }
   
   
  -        let private builtInInputs =
  -            Dictionary.ofList [
  -                ShaderStage.Vertex, 
  -                    Map.ofList [
  -                        Intrinsics.VertexId, "gl_VertexID"
  -                        Intrinsics.InstanceId, "gl_InstanceID"
  -                    ]
  -            ]
  -
  -        let parameterName (kind : ParameterKind) (name : string) (s : State) =
  +
  +        let regularName (kind : ParameterKind) (name : string) (s : State) =
               let c = s.config
   
               if kind = ParameterKind.Output && name = Intrinsics.Position && s.stages.next = Some ShaderStage.Fragment then
  
positive.code:                         | _ -> ""
                      
  
              sprintf "%s%s%s %s;" decorations prefix (CType.glsl p.cParamType) name |> Some
      
          let many (state : State) (kind : ParameterKind) (l : list<CEntryParameter>) =
              let definitions, _ = 
  
negative.code: 
      [<CompilationRepresentation(CompilationRepresentationFlags.ModuleSuffix)>]
      module CEntryParameter =
          let private regularDefinition (state : State) (kind : ParameterKind) (index : int) (p : CEntryParameter) =
              let c = state.config
              let decorations =
                  p.cParamDecorations 
  