DIRECTORY UXStrings; LibSearch: CEDAR DEFINITIONS = BEGIN UnixString: TYPE ~ UXStrings.CString; FD: TYPE ~ INTEGER; Bool: TYPE ~ INTEGER; False: Bool ~ 0; True: Bool ~ 1; Init: PROC ~ TRUSTED MACHINE CODE {".XR_lib_init"}; Crock1: PROC ~ TRUSTED MACHINE CODE {"."}; SymFind: PROC [ sym: UnixString, libfd: POINTER TO FD, liboffset: POINTER TO INT, magic: POINTER TO INT, modulename: POINTER TO UnixString] RETURNS [Bool] ~ TRUSTED MACHINE CODE {".XR_lib_symfind"}; END. D LibSearch.mesa Copyright Σ 1991 by Xerox Corporation. All rights reserved. Spreitze, February 13, 1991 11:02 am PST Michael Plass, August 20, 1991 12:22 pm PDT A Cedar reflection of xr/libsearch.h. Written by Mike Spreitzer on February 13, 1991, looking at libsearch.h of 20-Sep-89 13:25:45 PDT. Probably not necessary for Cedar clients to use. Call this somewhere in client code to complete the list of #includes. If the result is True, info on found location stored through given POINTERs. modulename gets the string "()". Κ§–(cedarcode) style•NewlineDelimiter ™code™Kšœ Οeœ1™