anchor.diff:      def .ntlmResponse()
          define raw-response 
             tag ListOfInts ^(78 84 76 77 83 83 80 0 2 0 0 0 0 0 0 0 40 0 0 0 1 130 0 0 83 114 118 78 111 110 99 101 0 0 0 0 0 0 0 0)
  -       #u:format 'type-2 length: %a\n' (raw-response(.word 16))
  -       #u:format 'type-2 nonce: %a\n' (raw-response(.slice 24 31))
  -       #u:format 'type-2 nonce: %a\n' (String!fromInts(raw-response(.slice 24 31)))
          define response 
               "NTLM %a"
                   .format (Base64!encodeUnsignedIntegers raw-response)
          list '401 Unauthorized' 
  -            list ^('Content-Type' = "text/html")
  +            list ^('Content-Type' = "text/plain")
                   cons 'WWW-Authenticate' response
               ~ "401 Login Required" 
       defmethod .decode()
  
positive.code:     def .ntlmResponse()
         list '200 OK' ^(('Content-Type' = "text/plain")) 
              (.decode)
                  list .domain .host .username
  
            
          
  
negative.code:       request
              print .self
              classify UncheckedRequest .self
              define response (.reply)
              print response
              response
  
     
  