{-
-- EPITECH PROJECT, 2026
-- Glados
-- File description:
-- Step2LabelDef
-}

module Compiler.ResolveLabels.Step2LabelDef (step2LabelDef) where

import Data.Text (Text)
import Compiler.Instruction (Instruction)

step2LabelDef :: [Instruction] -> Int -> Either Text ([Instruction], Int)
step2LabelDef :: [Instruction] -> Int -> Either Text ([Instruction], Int)
step2LabelDef [Instruction]
out Int
idx = ([Instruction], Int) -> Either Text ([Instruction], Int)
forall a b. b -> Either a b
Right ([Instruction]
out, Int
idx)