디시인사이드 갤러리

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

갤러리 본문 영역

Cada 오늘 재설계 한거 ㅋㅋ

나르시갤로그로 이동합니다. 2025.07.19 15:59:15
조회 45 추천 0 댓글 0

fork 래핑했는데,

ㅋㅋㅋ

rust에 nix 크레이트인가? 암튼 그런거 있다는데, 그거 따라했어

ㅋㅋㅋ

Ada(에이다)로도 러스트 Result 이런거 된다.

무슨 러스트만의 전유물인줄 아는 빠돌이들 많은거 같은데,

Ada 언어하면 눈 뒤집어진다. 없는게 없다. 다 있다. ㅎㅎ

그래서 어떻게 됐느냐?


fork 하면, 각각의 경우에 따라 두가지 결과를 리턴한다. ㅎㅎ


(status => Parent, child_pid => pid)

(status => Child)


이렇게 희안하게 리턴하는게 Ada로 가능함.

ㅋㅋ



-- -*- Mode: Ada; indent-tabs-mode: nil; c-basic-offset: 2; tab-width: 2 -*-

-- cada-process.adb

-- Copyright (c) 2025 Hodong Kim <hodong@nimfsoft.art>

--

-- Permission to use, copy, modify, and/or distribute this software for any

-- purpose with or without fee is hereby granted.

--

-- THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES

-- WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF

-- MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR

-- ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES

-- WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN

-- ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF

-- OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.

with Interfaces.C;

with unistd_h;

with stdlib_h;

with Cada;

with Cada.Error;


package body Cada.Process is

  use type Interfaces.C.int;


  procedure exit_process (status : Integer := EXIT_SUCCESS) is

  begin

    stdlib_h.c_exit (Interfaces.C.int (status));

    raise Program_Error with "Unreachable code: c_exit() should not return.";

  end exit_process;


  function get_pid return Pid is

  begin

    return unistd_h.getpid;

  end get_pid;


  function set_sid return Pid is

    result : constant Pid := unistd_h.setsid;

  begin

    if result = -1 then

      Cada.raise_from_errno (Cada.Error.get_errno, "setsid failed");

    end if;

    return result;

  end set_sid;


  function fork return Fork_Result is

    result : constant Pid := unistd_h.fork;

  begin

    case result is

      when 0 =>

        -- child프로세스입니다: status가 Child인 레코드 반환

        return (status => Child);

      when -1 =>

        -- 오류 발생 시 예외 처리

        Cada.raise_from_errno (Cada.Error.get_errno, "fork failed");

      when others =>

           -- parent프로세스입니다, child_pid)'에 해당:

           -- status가 Parent이고 자식 Pid를 포함한 레코드 반환

        return (status => Parent, child_pid => result);

    end case;

  end fork;


end Cada.Process;


추천 비추천

0

고정닉 0

0

댓글 영역

전체 댓글 0
본문 보기

하단 갤러리 리스트 영역

왼쪽 컨텐츠 영역

갤러리 리스트 영역

갤러리 리스트
번호 제목 글쓴이 작성일 조회 추천
설문 모태 솔로도 구제해 줄 것 같은 연애 고수 스타는? 운영자 25/07/21 - -
2874106 2찢명 사람 쓰고 버리기 스킬 ㅆㅅㅌㅊ! ♥팬티스타킹냥덩♥갤로그로 이동합니다. 07.24 30 0
2874105 짱깨들도 2찢명 쿠폰으로 한국세금 달달하거이 빨아먹는즁 ㅋㅅㅋ ♥팬티스타킹냥덩♥갤로그로 이동합니다. 07.24 26 0
2874104 물리 배우다 프로그래밍으로 넘어가서 편했던점 [2] ㅆㅇㅆ찡갤로그로 이동합니다. 07.24 68 0
2874103 나님만큼 최신 기술에 거부감 없이 잘쓰는 인재는 드뭄 ♥팬티스타킹냥덩♥갤로그로 이동합니다. 07.24 37 0
2874102 여기서 조언바래봤자 딴데 가는게 나음 [2] ㅆㅇㅆ찡갤로그로 이동합니다. 07.24 53 0
2874101 나님이 이번에 실험중인 항목들 ㅇㅅㅇ ♥팬티스타킹냥덩♥갤로그로 이동합니다. 07.24 28 0
2874100 2ㅌㅊ 까지는 올해마무리 할지 모르겠넹 ♥팬티스타킹냥덩♥갤로그로 이동합니다. 07.24 31 0
2874099 늒비 간곡한 조언 부탁드립니다 [1] 프갤러(203.10) 07.24 39 0
2874098 요즘 사람들 이를 안 닦나보군요 루도그담당(211.184) 07.24 45 0
2874097 중간 일정까지 고려하면 올해 간당하겠고 ♥팬티스타킹냥덩♥갤로그로 이동합니다. 07.24 25 0
2874096 단순 계산으로 75면.. 흠.. ♥팬티스타킹냥덩♥갤로그로 이동합니다. 07.24 25 0
2874095 내일 출근 안합니다 ㅋ 루도그담당(211.184) 07.24 39 0
2874093 지방은 경력 10년도 연봉 5천 미만 수두룩하네 프갤러(218.238) 07.24 44 0
2874092 웹 영상 drm 걸린건 왠만해선 복호화 불가능함? [8] ㅇㅇ(110.10) 07.24 87 0
2874091 프로그래밍 솔직히 한 5~6년전 코드보면 기억 안나서 느끼는거지만 [1] ㅆㅇㅆ(124.216) 07.24 57 0
2874090 나님 통찰력 ㄱㅆㅅㅌㅊ.. ♥팬티스타킹냥덩♥갤로그로 이동합니다. 07.24 28 0
2874089 언젠간 이 문서를 완성하는게 내 개인적 목표임 [2] ㅆㅇㅆ(124.216) 07.24 51 0
2874088 저기 밑에 WPF 예제 추천해줌 ㅇㅇ [4] ㅆㅇㅆ(124.216) 07.24 67 0
2874087 C#에서 고급 문법이랄게 뭐가 있을까 [1] 루도그담당(211.184) 07.24 53 0
2874086 C# WPF에 윈폼이면 그렇게 어려울거 없이 1년투자하면 될거같은데 [5] ㅆㅇㅆ(124.216) 07.24 83 0
2874085 내가 느끼는건 프로그래밍하다보면 자신만의 기술 개념의 계층이 필요함 [2] ㅆㅇㅆ(124.216) 07.24 59 0
2874083 나는 항상 프로그래밍 메타 따라갈려고 체크중인데 내가 느끼는게 ㅆㅇㅆ(124.216) 07.24 43 0
2874082 마음아프고 애정결핍애들 애반게리온 필수시청 [4] 프갤러(183.101) 07.24 44 0
2874081 날씨 미쳤네 진짜 루도그담당(211.184) 07.24 35 0
2874080 공수처 검찰청 경찰청 국제수사 과학수사 포랜식수사 기무사 국정원 존재이유 뒷통수한방(1.213) 07.24 22 0
2874079 봇찌 css로 만들어봄 [5] ㅇㅇ(125.205) 07.24 62 1
2874078 근데 권도형 미국 갔잖아 그래서 뭐 언급없는거 아닌가? [3] ㅆㅇㅆ(124.216) 07.24 49 0
2874076 님들 루나코인 폭락 사건 알음? [1] 프갤러(222.114) 07.24 52 0
2874075 오 대기업들 슬슬 시작하려는듯 ♥팬티스타킹냥덩♥갤로그로 이동합니다. 07.24 46 0
2874074 인정에서 발전이 시작되는법 ♥팬티스타킹냥덩♥갤로그로 이동합니다. 07.24 31 0
2874073 나님 회복탄력성 실험즁❤+ ♥팬티스타킹냥덩♥갤로그로 이동합니다. 07.24 34 0
2874072 나님 25억 인증❤+ ♥팬티스타킹냥덩♥갤로그로 이동합니다. 07.24 42 0
2874071 개인적으로 느끼는거지만 결국 프로그래밍은 어떤 글쓰기 스타일이냐가 [2] ㅆㅇㅆ(124.216) 07.24 77 2
2874070 길가다 찍은 일본의 묘한 선거포스터 [9] 아스카영원히사랑해갤로그로 이동합니다. 07.24 96 0
2874069 최악무능 친중좌파 2찢명 입구컷! ♥팬티스타킹냥덩♥갤로그로 이동합니다. 07.24 39 0
2874068 신입, 주니어 취준생들 이력서 첨삭해줌 프갤러(221.148) 07.24 37 0
2874067 우낏낏끼! 우키킼! [1] 통암기원숭이(211.235) 07.24 51 0
2874066 ❤✨☀⭐⚡☘⛩나님 시작합니당⛩☘⚡⭐☀✨❤ ♥팬티스타킹냥덩♥갤로그로 이동합니다. 07.24 27 0
2874065 파이어 베이스 쓰는게 나을까? 프갤러(39.118) 07.24 32 0
2874064 MSA가 꼭 크기는 클 필요 없긴함 ㅆㅇㅆ(124.216) 07.24 36 0
2874063 30대 모솔아다 지잡 비전공 백수 무직 [2] 어린이노무현갤로그로 이동합니다. 07.24 69 0
2874061 msa 개인프로젝트는 뭐 어케하는거냐 [2] 밀우갤로그로 이동합니다. 07.24 59 0
2874060 스킬은 바뀐다 하지만 프갤러(211.234) 07.24 34 0
2874059 ❤✨☀⭐⚡☘⛩나님 시작합니당⛩☘⚡⭐☀✨❤ ♥팬티스타킹냥덩♥갤로그로 이동합니다. 07.24 26 0
2874058 [2찢명] 자녀특혜비리의혹 최휘영 제2의 조국사태 터질 조짐 ♥팬티스타킹냥덩♥갤로그로 이동합니다. 07.24 51 0
2874057 공수처 검찰청 경찰청 국제수사 과학수사 포랜식수사 기무사 국정원 존재이유 뒷통수한방(1.213) 07.24 27 0
2874055 이갤엔 마음이 아픈 애들이 참 많구낭.. ♥팬티스타킹냥덩♥갤로그로 이동합니다. 07.24 44 0
2874054 회사에서 권고사직만 허락해주면 바로나갈껀데.. [2] ㅇㅇ(211.235) 07.24 65 0
2874053 양자역학은 세상이 확률적이라고 하는데... ㅇㅇ(183.101) 07.24 45 0
2874052 학원들 대세 타는거 왜이리 빠르노 ㅇㅇ(211.235) 07.24 84 0
뉴스 '전참시' 28년 차 레전드 혼성그룹 코요태 첫 출격! 육아 난이도 上 두 아들 종민&빽가와 엄마 신지(?) '찰떡 케미' 디시트렌드 07.25
갤러리 내부 검색
제목+내용게시물 정렬 옵션

오른쪽 컨텐츠 영역

실시간 베스트

1/8

뉴스

디시미디어

디시이슈

1/2