디시인사이드 갤러리

갤러리 이슈박스, 최근방문 갤러리

갤러리 본문 영역

러빨러도 울고 갈, Ada 예외 처리, 6.5 Ada.Exceptions

나르시갤로그로 이동합니다. 2025.09.16 02:26:35
조회 80 추천 0 댓글 1

6.5 Ada.Exceptions 패키지

Ada.Exceptions 패키지는 예외 관련 정보를 다루기 위한 타입과 서브프로그램을 제공합니다.

6.5.1 타입 (Types)

Ada.Exceptions 패키지에는 예외를 다루기 위한 타입과 관련 상수가 정의되어 있습니다.

Exception_Id 타입은 각각의 예외를 고유하게 식별하는 타입입니다. NULL_ID 상수는 Exception_Id 타입의 상수로, 어떠한 예외도 나타내지 않습니다. 이 값은 Exception_Id 타입의 기본 초기값으로 사용됩니다.

Exception_Occurrence 타입은 발생한 예외의 특정 인스턴스에 대한 정보를 나타내는 limited private 타입입니다. 예외 처리기에서 when e : others처럼 선언된 상수 e가 이 타입에 해당합니다. NULL_OCCURRENCE 상수는 Exception_Occurrence 타입의 상수로, 어떠한 예외 발생도 나타내지 않습니다. 이 값은 Exception_Occurrence 타입의 기본 초기값으로 사용됩니다.

Exception_Occurrence_Access 타입은 Exception_Occurrence 객체를 가리키는 접근(access) 타입이며 save_occurrence 함수와 함께 사용되어, 예외 발생 정보를 힙(heap)에 저장하거나 다른 태스크로 전달하는 등의 동적 처리를 가능하게 합니다.

6.5.2 예외 정보 조회 (information retrieval)

다음의 함수들은 발생한 예외(Exception_Occurrence)나 예외의 종류(Exception_Id)에 대한 정보를 반환하는 역할을 합니다.

exception_identity (x : Exception_Occurrence) return Exception_Id;
-- 이 함수는 주어진 예외 발생 인스턴스에 대한 예외의 고유 식별자(`Exception_Id`)를 반환합니다.

exception_name (id : Exception_Id) return String;
-- 이 함수는 예외의 고유 식별자인 `Exception_Id`를 매개변수로 받아, 해당 예외의 이름(예: `CONSTRAINT_ERROR`)을 반환합니다. `'identity` 속성으로 얻은 ID 값을 사용할 때 유용합니다.

exception_name (x : Exception_Occurrence) return String;
-- 이 함수는 실제로 발생한 예외의 인스턴스인 `Exception_Occurrence`를 매개변수로 받아, 해당 예외의 이름을 반환합니다. (내부적으로 `exception_name (exception_identity (x))`를 호출하는 것과 동일합니다.) 예외 처리기에서 `when e : others =>`와 같이 예외 발생 정보를 받았을 때 사용합니다.

exception_message (x : Exception_Occurrence) return String;
-- 예외 발생 시 연관된 메시지를 반환합니다. `raise with "메시지";`와 같이 발생한 예외의 경우 해당 메시지를 반환합니다.

exception_information (x : Exception_Occurrence) return String;
-- 구현에 따라 정의된, 디버깅에 유용한 상세 정보를 문자열로 반환합니다.

wide_exception_name (id : Exception_Id) return Wide_String;
-- `Exception_Name`과 유사하지만, 예외의 전체 확장 이름을 `Wide_String` 타입으로 반환합니다.

wide_exception_name (x : Exception_Occurrence) return Wide_String;
-- 주어진 예외 발생(x)에 대한 예외 이름을 `Wide_String` 타입으로 반환합니다.

wide_wide_exception_name (id : Exception_Id) return Wide_Wide_String;
-- 예외의 전체 확장 이름을 `Wide_Wide_String` 타입으로 반환합니다.

wide_wide_exception_name (x : Exception_Occurrence) return Wide_Wide_String;
-- 주어진 예외 발생(x)에 대한 예외 이름을 `Wide_Wide_String` 타입으로 반환합니다.

-- 예외 정보 조회 예시
with Ada.Text_IO, Ada.Exceptions;
procedure information_example is
  use Ada.Exceptions;
  My_Error : exception;
begin
  -- 예외와 함께 메시지 발생
  raise My_Error with "데이터 처리 중 오류 발생";
exception
  when e : others =>
    Ada.Text_IO.put_line ("예외가 포착되었습니다.");
    Ada.Text_IO.put_line ("예외 이름: " & exception_name (e));
    Ada.Text_IO.put_line ("예외 메시지: " & exception_message (e));
    Ada.Text_IO.put_line ("구현 정의 정보: " & exception_information (e));
end information_example;

6.5.3 예외 발생 및 전파 (Raising and Propagation)

다음의 프로시저들은 예외를 능동적으로 발생시켜 프로그램의 정상적인 실행 흐름을 중단시키는 역할을 합니다.

raise_exception (e       : in Exception_Id;
                 message : in String := "");
-- `Exception_Id`로 식별되는 예외를 주어진 메시지와 함께 발생시키는 프로시저입니다.

reraise_occurrence (x : in Exception_Occurrence);
-- 주어진 `Exception_Occurrence`를 다시 발생시킵니다. 이는 예외 처리기 내에서만 사용 가능한 `raise;` 문과 달리, 예외 처리기 외부에서도 원래의 예외 발생 정보를 그대로 전파할 수 있게 합니다.

-- 예외 발생 및 전파 예시:
-- 하위 루틴에서 발생한 예외를 상위 루틴으로 전달하고 메시지를 출력
with Ada.Text_IO, Ada.Exceptions;

procedure propagation_example is
  use Ada.Exceptions;

  procedure inner_routine is
    My_Custom_Error : exception;
  begin
    -- `raise_exception`을 사용하여 사용자 정의 예외와 메시지를 함께 발생시킴
    raise_exception (My_Custom_Error'identity, "입력값이 유효하지 않습니다.");
  exception
    when e : others =>
      Ada.Text_IO.put_line ("내부(하위) 루틴에서 예외 포착: " &
                            exception_name (e));
      -- 포착된 예외를 다시 발생시켜 외부(상위) 루틴으로 전달
      reraise_occurrence (e);
  end inner_routine;

begin
  begin
    inner_routine;
  exception
    when e : others =>
      Ada.Text_IO.put_line ("외부(상위) 루틴에서 예외 재포착: " &
                            exception_name (e));
      Ada.Text_IO.put_line ("메시지: " & exception_message (e));
  end;
end propagation_example;

6.5.4 예외 발생 정보 관리 (Occurrence Management)

다음의 서브프로그램들은 Exception_Occurrence 객체 자체를 복사, 저장, 또는 스트림을 통해 전송하는 등 관리하는 역할을 합니다.

save_occurrence (target : out Exception_Occurrence;
                 source : in  Exception_Occurrence);
-- `source` 예외 발생 인스턴스를 `target` 으로 복사합니다.

save_occurrence (source : Exception_Occurrence)
return Exception_Occurrence_Access;
-- 새로운 `Exception_Occurrence` 객체를 동적으로 할당하고 `source`의 내용을 복사한 후, 해당 객체를 가리키는 `Exception_Occurrence_Access` 타입의 값을 반환합니다.

write_exception_occurrence (
  stream : not null access Ada.Streams.Root_Stream_Type'class;
  item   : in Exception_Occurrence);
-- 예외 발생 인스턴스에 대한 표현을 스트림에 기록합니다.

read_exception_occurrence (
  stream : not null access Ada.Streams.Root_Stream_Type'class;
  item   : out Exception_Occurrence);
-- 스트림으로부터 예외 발생 인스턴스를 재구성합니다. 이는 다른 파티션(partition)에 기록된 예외도 포함합니다.

-- `save_occurrence`를 활용한 예외 정보 관리 예시
with Ada.Text_IO, Ada.Exceptions, Ada.Integer_Text_IO;
with Ada.IO_Exceptions;

procedure save_example is
  use Ada.Exceptions;

  function get_input return Integer is
    value : Integer;
  begin
    Ada.Text_IO.put ("숫자를 입력하세요 (0 입력 시 예외 발생): ");
    Ada.Integer_Text_IO.get (value);
    return value;
  end get_input;

  -- 예외 정보를 저장할 변수
  err_occ : Exception_Occurrence;

begin
  begin
    declare
      v : constant Integer := get_input;
    begin
      -- 입력값으로 나눗셈 수행 (0 입력 시 예외 발생)
      Ada.Text_IO.put_line ("결과: " & Integer'image (10 / v));
    exception
      -- 내부 블록에서 발생한 모든 예외 처리
      when e : others =>
        Ada.Text_IO.put_line ("예외가 발생했습니다 (내부 블록).");
        save_occurrence (err_occ, e);
    end;
  exception
    -- 입력 스트림 종료 예외 처리
    when e : Ada.IO_Exceptions.End_Error =>
      Ada.Text_IO.put_line ("오류: 입력 스트림이 종료되었습니다.");
      -- 예외 정보를 저장하여 일관된 처리 유지
      save_occurrence (err_occ, e);
    -- 외부 블록에서 발생한 기타 예외 처리
    when e : others =>
      Ada.Text_IO.put_line ("예외가 발생했습니다 (외부 블록).");
      save_occurrence (err_occ, e);
  end;

  Ada.Text_IO.put_line ("저장된 예외 정보:");
  if exception_identity (err_occ) /= NULL_ID then
    Ada.Text_IO.put_line ("예외 이름: " & exception_name (err_occ));
    Ada.Text_IO.put_line ("예외 메시지: " & exception_message (err_occ));
  else
    Ada.Text_IO.put_line ("저장된 예외가 없습니다.");
  end if;

end save_example;

6.5.5 'identity 속성

'identity 속성은 예외의 이름으로부터 시스템이 내부적으로 사용하는 고유 식별값(Exception_Id 타입의 값)을 얻어오는 데 사용됩니다. 이 속성은 프로그래머가 직접 선언한 예외와 Constraint_Error처럼 언어에 미리 정의된 예외 모두에 사용할 수 있습니다.

예를 들어, Ada.Exceptions.raise_exception 프로시저를 통해 특정 예외를 발생시키려면 해당 예외의 Exception_Id 값이 필요합니다. 이때 어떤 예외를 발생시킬지 이름을 알고 있다면 'identity 속성을 사용하고, 예외 처리기 안에서 어떤 예외가 발생했는지 모르는 상황이라면 exception_identity 함수를 사용하여 Exception_Id 값을 얻을 수 있습니다.

예시:

with Ada.Text_IO, Ada.Exceptions;
procedure id_attribute_example is
  use Ada.Exceptions;
  -- 사용자 정의 예외 선언
  Overflow  : exception;
  Underflow : exception;

begin
  -- 'identity 속성을 사용하여 예외 발생시키기
  Ada.Exceptions.raise_exception (Overflow'identity,
                                  "Overflow detected manually.");

exception
  when e : others =>
    Ada.Text_IO.put_line ("An exception was caught.");

    -- exception_identity 함수를 사용하여 발생한 예외의 ID를 얻음
    declare
      the_id : constant Ada.Exceptions.Exception_Id :=
        Ada.Exceptions.exception_identity (e);
    begin
      Ada.Text_IO.put_line ("Message: " & Ada.Exceptions.exception_message (e));

      -- 얻어낸 ID를 사용하여 어떤 예외인지 확인
      if the_id = Overflow'identity then
        Ada.Text_IO.put_line ("The exception was Overflow.");
      elsif the_id = Underflow'identity then
        Ada.Text_IO.put_line ("The exception was Underflow.");
      else
        Ada.Text_IO.put_line ("It was some other exception.");
      end if;
    end;

end id_attribute_example;


https://nimfsoft.art/ko/books/ada-programming/#65-adaexceptions-%ED%8C%A8%ED%82%A4%EC%A7%80


 



오늘은 여기까지입니다. 6.6절부터 작성해야되요. ㅠㅠ


추천 비추천

0

고정닉 0

0

댓글 영역

전체 댓글 0
본문 보기

하단 갤러리 리스트 영역

왼쪽 컨텐츠 영역

갤러리 리스트 영역

갤러리 리스트
번호 제목 글쓴이 작성일 조회 추천
설문 센터해도 될 것 같이 비주얼 물오른 아이돌 멤버는? 운영자 25/09/22 - -
AD 가전디지털, 액세서리 SALE 운영자 25/09/12 - -
2890668 쀼? [2] ♥냥덩이♥갤로그로 이동합니다. 09.20 54 0
2890667 LLM으로 생성한 목차.txt 나르시갤로그로 이동합니다. 09.20 55 0
2890666 여기 갤 망했나욘? [10] zian갤로그로 이동합니다. 09.20 103 0
2890664 입사지원자동화툴(사람인,원띠드) 공유 무43(218.149) 09.20 54 0
2890663 나님 주무시기전 소통⭐+ 질문 받음 [6] ♥냥덩이♥갤로그로 이동합니다. 09.20 86 0
2890661 ❤✨☀⭐⚡☘⛩나님 시작합니당⛩☘⚡⭐☀✨❤ [2] ♥냥덩이♥갤로그로 이동합니다. 09.20 72 0
2890654 나님 긍야즁 [1] ♥냥덩이♥갤로그로 이동합니다. 09.20 69 0
2890652 유튜브 하면 외롭다. 배경음악 다 끄고 방송해야되기 때문 우울해짐. 넥도리아(220.74) 09.20 37 0
2890651 나님 왤케 특별한걸깡.. [1] ♥냥덩이♥갤로그로 이동합니다. 09.20 84 0
2890649 콩쯔가 이미 했던 말 [1] 발명도둑잡기(118.216) 09.20 53 0
2890648 음악 같은거 스폰서로 배경음악으로 깔려면 수익창출 안하고, 어떻게 출첵 넥도리아(220.74) 09.20 32 0
2890647 가장 치명적인 무지는 알고있다는 착각이당 By 나님 [1] ♥냥덩이♥갤로그로 이동합니다. 09.20 71 0
2890646 두둥~ 러스트가 울고 간다는 LLM와 Ada/SPARK 논문 나르시갤로그로 이동합니다. 09.20 47 0
2890645 나님 데자뷰 [1] ♥냥덩이♥갤로그로 이동합니다. 09.20 75 0
2890644 전면 패널 고장났네... 광고 미쳤네. 넥도리아(220.74) 09.20 38 0
2890642 소자 라이팅 콘덴서에다가 핀셋을 가져다 되고 쇼트 그만해야하나. 다 고장 넥도리아(220.74) 09.20 29 0
2890641 Ada 책의 앞부분 목차를 창조하고 있습니다. 나르시갤로그로 이동합니다. 09.20 38 0
2890640 음기 충전 발명도둑잡기(118.216) 09.20 34 0
2890639 ADAMAS Music ost 가 마렵구나. 넥도리아(220.74) 09.20 37 0
2890638 좇센에서 번식한애들한테 하고픈 말 ) 번식 더해줘 이기이기 ㅋㅋㅋ 타이밍뒷.통수한방(1.213) 09.20 33 0
2890637 다음번에 Ada 기초편을 작성하겠습니다. ㅎㅎ 나르시갤로그로 이동합니다. 09.20 37 0
2890635 러스트도 울고 간, Ada 6.9 최적화에 따른 예외 처리 방식의 변화 나르시갤로그로 이동합니다. 09.20 47 0
2890634 요즘 불안의 근원 규소기반 생명체 발명도둑잡기(118.216) 09.20 44 0
2890633 러스트도 울고 간, Ada 6.8 런타임 검사 억제 나르시갤로그로 이동합니다. 09.20 54 0
2890632 러스트도 울고 간, Ada 6.7 단언(assertion)과 예외 나르시갤로그로 이동합니다. 09.20 45 0
2890631 러스트도 울고 간, Ada 6.6 Ada.Exceptions 패키지 나르시갤로그로 이동합니다. 09.20 44 0
2890630 러스트도 울고 간, Ada 6.5 예외 전파 나르시갤로그로 이동합니다. 09.20 28 0
2890628 러스트도 울고 간, Ada 6.4 반환값 생성을 위한 예외 처리 나르시갤로그로 이동합니다. 09.20 23 0
2890627 q=usb+pin+map 넥도리아(220.74) 09.20 24 0
2890626 바질 소세지 뭔 맛으로 먹냐? 비릿해서... [2] 나르시갤로그로 이동합니다. 09.20 45 0
2890624 사과를 세워서 자르지 마세요! 그동안 모두 잘못 알고 있었습니다 발명도둑잡기(118.216) 09.20 24 0
2890622 아 피자먹고싶다 [7] 루도그담당(58.239) 09.20 61 0
2890621 씨이이이발 개발자용 ai 따로내달라고 [2] 뉴진파갤로그로 이동합니다. 09.20 77 0
2890620 이게 외주 생활자는 고정거래처 없으면 좀 힘들긴함 [7] ㅆㅇㅆ(124.216) 09.20 77 0
2890619 나도 외주 뛰어들까 하는데 [2] 프갤러(211.234) 09.20 67 0
2890618 프갤에 이거 갖고 있는 사람 있는 듯 발명도둑잡기(118.216) 09.20 26 0
2890617 좇센에서 번식한애들한테 하고픈 말 ) 번식 더해줘 이기이기 ㅋㅋㅋ 뒷통수한방(1.213) 09.20 33 0
2890613 아휴 돈 벌기 힘드네.. [3] 나르시갤로그로 이동합니다. 09.20 53 0
2890612 [냥덩단상] 채식주의자 [3] ♥냥덩이♥갤로그로 이동합니다. 09.20 65 0
2890611 배 아파서 5분 전에 화장실 들어왔다 [3] 발명도둑잡기(118.216) 09.20 51 0
2890610 나님 긍야즁 [1] ♥냥덩이♥갤로그로 이동합니다. 09.20 51 0
2890609 뭔짓을 해서 하필 남쪽에서 태어났을까 ㄹㅇ [1] 뒷통수한방(1.213) 09.20 33 0
2890608 “여자 연습생 10명 중 8명은 월경을 안 한다”… K팝 시스템의 민낯 발명도둑잡기(118.216) 09.20 45 0
2890607 4시에 잠들었는데 [3] 루도그담당(58.239) 09.20 46 0
2890606 롯데카드 보안투자 줄인 MBK … 인수 후 배당은 4배로 확 늘려 발명도둑잡기(118.216) 09.20 32 0
2890605 매운거 머거서 그런가 배아푸넹 ♥냥덩이♥갤로그로 이동합니다. 09.20 33 0
2890603 7시 30분에 외주 작업해야한다 ㅆㅇㅆ(124.216) 09.20 31 0
2890602 북한 여자 레슬링…세계선수권서 메달 5개 획득 발명도둑잡기(118.216) 09.20 22 0
2890601 러빨러 본인도 러스트 안 쓰면서 회사 사람들한테 나르시갤로그로 이동합니다. 09.20 35 0
2890600 김광석 표절 ♥냥덩이♥갤로그로 이동합니다. 09.20 51 0
뉴스 27일 '락 페스티벌' 개최. . .김종서·소찬휘 등 8팀 출연…신월야구장서 무료 공연 디시트렌드 09.22
갤러리 내부 검색
제목+내용게시물 정렬 옵션

오른쪽 컨텐츠 영역

실시간 베스트

1/8

뉴스

디시미디어

디시이슈

1/2