디시인사이드 갤러리

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

갤러리 본문 영역

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

나르시갤로그로 이동합니다. 2025.09.16 02:26:35
조회 89 추천 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 - -
이슈 ‘용원게이’를 넘어 배우 장용원으로 운영자 25/09/23 - -
AD 프로게이머가 될테야!! 운영자 25/09/12 - -
2890490 121.139 왜 쟤 상대해주냐 쟤 열등감덩어린데 [3] ㅆㅇㅆ(124.216) 09.20 125 0
2890489 청년들은 좇센 보다 북한 중국에서 태어나는게 난이도 더 쉬움 타이밍뒷.통수한방(1.213) 09.20 129 0
2890488 이재명 탄핵 ♥냥덩이♥갤로그로 이동합니다. 09.20 38 1
2890487 루도그 재 왜저러냐 ㅋㅋ [2] 프갤러(121.139) 09.20 101 5
2890486 너넨 이거 보면서 안타깝다는 생각 들지않냐? [13] 루도그담당(58.239) 09.20 187 0
2890485 프갤을 이해해보자 ㅇㅇ갤로그로 이동합니다. 09.20 48 0
2890484 올해 초에 게임 8월에 꼭 출시한다고 발악하지만 [1] ㅇㅇ(211.234) 09.20 47 2
2890483 잔 다 ㅇㅅㅇ// [3] 헤르 미온느갤로그로 이동합니다. 09.20 35 0
2890482 먹어써? 뿍뿍이(121.151) 09.20 29 0
2890481 푸탄한테 개털리는 찐따북괴 ♥냥덩이♥갤로그로 이동합니다. 09.20 44 0
2890480 루도그담당? ㅆㅇㅆ? 둘이 참 재밋는 새끼들임 ㅋㅋ [11] 프갤러(121.139) 09.20 162 5
2890479 조나단 느그홍 나중에 나라 경기 호황이면 그때 장관하자 뒷통수한방(1.213) 09.20 26 0
2890478 AI 경쟁서 한국 존재감…미중 이어 세계 3위 발명도둑잡기(118.216) 09.20 37 0
2890477 졸린데 더 잘까 [2] 루도그담당(58.239) 09.20 42 0
2890476 한국에서 열심히살 필요가없는 이유 jpg [2] 운동의 계절, 투운(1.213) 09.20 55 0
2890475 어린이세상 [1] 뿍뿍이(121.151) 09.20 47 0
2890474 ❤✨☀⭐⚡☘⛩나님 시작합니당⛩☘⚡⭐☀✨❤ ♥냥덩이♥갤로그로 이동합니다. 09.20 32 0
2890473 지피티를 오래 쓸수록 주로 업무용에서 개인용으로 더 많이 활용하게되더라 [2] ㅆㅇㅆ(124.216) 09.20 61 0
2890472 지피티 내부 데이터를 활용한 최초 경제학 연구 나왔더라 [8] ㅆㅇㅆ(124.216) 09.20 336 7
2890471 세계 최고 명차도 아닌데... 놀라운 컨버터블 더위드카갤로그로 이동합니다. 09.20 108 0
2890470 121.139 좀 보는데 쟤 그냥 뭐 기초도 잘모르던데 [3] ㅆㅇㅆ(124.216) 09.20 67 0
2890469 10년 뒤 190조 대박 '이것'에 세계가 주목 더위드카갤로그로 이동합니다. 09.20 112 0
2890468 벤츠의 혁신, 주유소의 운명은? 더위드카갤로그로 이동합니다. 09.20 95 0
2890467 1036마력 '괴물' 하이브리드 출현, 세계 관심 더위드카갤로그로 이동합니다. 09.20 98 0
2890466 내가 만나본 펌웨어 프로그래머 [3] 프갤러(59.16) 09.20 82 0
2890459 저게 뭐지? ㅇㅅㅇ 헤르 미온느갤로그로 이동합니다. 09.20 34 0
2890456 태연 ㅇㅅㅇ 헤르 미온느갤로그로 이동합니다. 09.20 34 0
2890454 하루 한 번 헤르미온느 찬양 헤르 미온느갤로그로 이동합니다. 09.20 41 0
2890447 인지과학조져라 손발이시립디다갤로그로 이동합니다. 09.20 50 0
2890412 진본 사진, 음성, 영상 파일 해킹당해 조작처럼 위조 주의 발명도둑잡기(118.216) 09.20 30 0
2890391 여기는 뭐 병신들밖에없노 [2] ㅇㅇ(118.235) 09.20 97 1
2890379 에픽하이-난 사람이 제일 무서워 발명도둑잡기(118.216) 09.20 66 0
2890361 안될과학 생물학, 지구과학, 환경과학 분량은 좀 부족 발명도둑잡기(118.216) 09.20 44 0
2890349 성경이 수메르 신화 카피했다는 내용의 예술작품 발명도둑잡기(118.216) 09.20 76 0
2890348 무역전쟁 당사국은 내수가 훨씬 크다. 고래 싸움에 새우 등. 발명도둑잡기(118.216) 09.20 32 0
2890347 김웅진 교수님 발명도둑잡기(118.216) 09.20 76 0
2890346 토스,네이버,당근 이런곳에 가짜프로그래머들 넘쳐나는데 [25] 프갤러(121.139) 09.20 277 1
2890345 음기 충전 발명도둑잡기(118.216) 09.20 74 0
2890344 중국에서 태어나는게 더 나음 ㅇㅇ 뒷통수한방(1.213) 09.20 52 0
2890343 조나단 느그홍 나중에 나라 경기 호황이면 그때 장관하자 뒷통수한방(1.213) 09.20 36 0
2890341 프갤러들은 지금쯤 꿈나라겠지요? [2] 루도그담당(58.239) 09.20 61 0
2890339 음저협 고위 임원 비위 사실 포착 발명도둑잡기(118.216) 09.20 58 0
2890338 이영애, 개인파산 최다 '신용카드 대란 사건' 직접 언급.."충격이었다 발명도둑잡기(118.216) 09.20 75 0
2890337 광주 창고형 약국은 미국처럼 펜타닐 중독자를 양산하는 길이다 발명도둑잡기(118.216) 09.20 47 0
2890336 하필 이재명 섹스톤 보유국에서 태어나냐 씹 ㅋㅋㅋ 뒷통수한방(1.213) 09.20 66 0
2890335 오늘의 작사 실마리: 바이블은 수메르 신화의 복제 발명도둑잡기(118.216) 09.20 51 0
2890333 종교학자가 말하는 성경이 과학적 사실이 아닌 이유 발명도둑잡기(118.216) 09.20 49 0
2890332 내동생 토스남이랑 만나는데 [2] 프갤러(116.36) 09.20 103 0
2890330 한국, 일본, 미국은 북중러에게 핵폭 맞을 위험 발명도둑잡기(118.216) 09.20 44 0
2890329 나도 마우스 랙 몇번 겪었는데 발명도둑잡기(118.216) 09.20 46 0
뉴스 '톡파원 25시' 다저스타디움부터 요세미티 국립공원까지! 극과 극 LA 탐방 디시트렌드 09.23
갤러리 내부 검색
제목+내용게시물 정렬 옵션

오른쪽 컨텐츠 영역

실시간 베스트

1/8

뉴스

디시미디어

디시이슈

1/2