Function collectRLinkingTo

src/cppProperties.ts:116–130

(workspaceFolder: string)

}

async function collectRLinkingTo(workspaceFolder: string): Promise<string[]> {
    if (!fs.existsSync(path.join(workspaceFolder, 'DESCRIPTION'))) {
        return [];
    }

    const rScript = extensionContext.asAbsolutePath('R/cppProperties/extractLinkingTo.R').replace(/\\/g, '/');
    const linkingToIncludesStr = (await executeRCommand(`source('${rScript}')`, workspaceFolder, (e: Error) => {
        void window.showErrorMessage(e.message);
        return '';
    }))?.trim();
    if (!linkingToIncludesStr || linkingToIncludesStr === '') {
        return [];
    }
    return linkingToIncludesStr.split(/\r?\n/g).map(decodeURI);
}

function ensureUnquoted(str: string): string {
    if (/(^".*"$)|(^'.*'$)/.test(str)) {