kreyren/pman
1
0
Fork 0
Code Issues 16 Pull Requests 2 Releases Activity

Initial declaration for QA and audit

Browse Source 
Signed-off-by: Jacob Hrbek <kreyren@rixotstudio.cz>
This commit is contained in:
Jacob Hrbek 2022-08-28 12:36:37 +02:00
parent 872bbde01e
commit 55f271afee
Signed by: kreyren
GPG Key ID: 667F0DAFAF09BA2B
1 changed files with 21 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
make/main.scm
View File

@ -1,8 +1,25 @@
;;; The Project Manager ("pman") -- GNU Guile-based solution for project management
;;; Copyright (C) 2021 Mike Gran <spk121@yahoo.com>
;;; Copyright (C) 2022 Jacob Hrbek <kreyren@rixotstudio.cz>
;;;
;;; The Project Manager is a Free/Libre Open-Source Software; you can redistribute it and/or modify it under the terms of the MIT License as published by the Massachusetts Institute of Technology
;;;
;;; This project is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the MIT License for more details.
;;;
;;; You should have received a copy of the MIT License along with the project. If not, see <https://mit-license.org>.
(define-module (make main) (define-module (make main)
#:use-module (ice-9 getopt-long) #:use-module (ice-9 getopt-long)
#:export (main) #:export (main))
)
;;; Commentary:
;;;
;;; This file is designed to process the command line arguments using the standardized 'getopts-long' as described in the GNU Guile reference manual <https://www.gnu.org/software/guile/manual/html_node/getopt_002dlong.html>.
;;;
;;; Code:
;; FIXME-QA(Krey): Is this even needed?
;; Declare exit codes
(define EXIT_SUCCESS 0) (define EXIT_SUCCESS 0)
(define EXIT_NOT_UP_TO_DATE 1) (define EXIT_NOT_UP_TO_DATE 1)
(define EXIT_FAILURE 2) (define EXIT_FAILURE 2)
@ -26,3 +43,4 @@
(newline) (newline)
EXIT_SUCCESS)) EXIT_SUCCESS))
;;; make.scm ends here