mirror of
https://github.com/compiler-explorer/compiler-explorer.git
synced 2026-05-16 17:13:59 -04:00
3d4fc27de0
Based on https://github.com/KaceCottam/compiler-explorer/commits/language-perl/ rebased, modernized and captures the generated perl op codes. <img width="1569" height="878" alt="image" src="https://github.com/user-attachments/assets/4d131097-d258-419b-86c9-1a56c16f9ce2" /> --------- Co-authored-by: Kace Cottam <kaceac1@hotmail.com>
37 lines
1.9 KiB
TypeScript
37 lines
1.9 KiB
TypeScript
// Copyright (c) 2025, Compiler Explorer Authors
|
|
// All rights reserved.
|
|
//
|
|
// Redistribution and use in source and binary forms, with or without
|
|
// modification, are permitted provided that the following conditions are met:
|
|
//
|
|
// * Redistributions of source code must retain the above copyright notice,
|
|
// this list of conditions and the following disclaimer.
|
|
// * Redistributions in binary form must reproduce the above copyright
|
|
// notice, this list of conditions and the following disclaimer in the
|
|
// documentation and/or other materials provided with the distribution.
|
|
//
|
|
// THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
|
|
// AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
// IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
// ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
|
|
// LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
|
// CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
|
// SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
|
// INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
|
// CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
|
// ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
|
// POSSIBILITY OF SUCH DAMAGE.
|
|
|
|
import type {AssemblyInstructionInfo} from '../../types/assembly-docs.interfaces.js';
|
|
import {BaseAssemblyDocumentationProvider} from './base.js';
|
|
import {getAsmOpcode} from './generated/asm-docs-perl.js';
|
|
|
|
export class PerlDocumentationProvider extends BaseAssemblyDocumentationProvider {
|
|
public static get key() {
|
|
return 'perl';
|
|
}
|
|
public override getInstructionInformation(instruction: string): AssemblyInstructionInfo | null {
|
|
return getAsmOpcode(instruction) || null;
|
|
}
|
|
}
|