This file is indexed.

/usr/share/gnudatalanguage/lib/rstrpos.pro is in libgnudatalanguage0 0.9.7-6.

This file is owned by root:root, with mode 0o644.

The actual contents of the file can be viewed below.

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
; by Sylwester Arabas <slayoo (at) igf.fuw.edu.pl>
function rstrpos, haystack, needle, pos
  on_error, 2
 
  if ~keyword_set(haystack) || ~keyword_set(needle) then $
    message, 'First and second arguments must not be undefined' 
  if n_elements(needle) ne 1 then $
    message, 'Second argument must be a scalar or one element array'
  if keyword_set(pos) then begin
    return, strpos(haystack, needle, pos, /reverse_search) 
  endif else begin
    return, strpos(haystack, needle, /reverse_search)
  endelse
  compile_opt obsolete
end