From 22d98bbdd6e7c20bda11ef2ee53e6a430b7d6b11 Mon Sep 17 00:00:00 2001 From: sech1p Date: Sun, 25 Jul 2021 18:21:21 +0200 Subject: [PATCH 1/2] Add uwu in COBOL --- README.md | 2 ++ uwu.cbl | 5 +++++ uwu.gcbl | 6 ++++++ 3 files changed, 13 insertions(+) create mode 100644 uwu.cbl create mode 100644 uwu.gcbl diff --git a/README.md b/README.md index 76c950c..a937e73 100644 --- a/README.md +++ b/README.md @@ -10,6 +10,8 @@ uwu in every programming language in the world - [C](uwu.c) - [C#](uwu.cs) - [C++](uwu.cpp) +- [COBOL](uwu.cbl) + - [GnuCOBOL](uwu.gcbl) - [D](uwu.d) - [Elixir](uwu.ex) - [Emojicode](uwu.emojic) diff --git a/uwu.cbl b/uwu.cbl new file mode 100644 index 0000000..414c9fc --- /dev/null +++ b/uwu.cbl @@ -0,0 +1,5 @@ +IDENTIFICATION DIVISION. +PROGRAM-ID. UWU. +PROCEDURE DIVISION. +DISPLAY 'uwu'. +STOP RUN. diff --git a/uwu.gcbl b/uwu.gcbl new file mode 100644 index 0000000..e732783 --- /dev/null +++ b/uwu.gcbl @@ -0,0 +1,6 @@ +000100 id division. +000200 program-id. uwu. +000300 procedure division. +000400 display "uwu" end-display +000500 goback. + From cf968d4237470b40b6c370660dbc093ec431673c Mon Sep 17 00:00:00 2001 From: sech1p Date: Sun, 25 Jul 2021 19:17:33 +0200 Subject: [PATCH 2/2] Add uwu in COBOL --- README.md | 1 + uwu.cbl | 5 +++++ 2 files changed, 6 insertions(+) create mode 100644 uwu.cbl diff --git a/README.md b/README.md index 76c950c..bacd729 100644 --- a/README.md +++ b/README.md @@ -10,6 +10,7 @@ uwu in every programming language in the world - [C](uwu.c) - [C#](uwu.cs) - [C++](uwu.cpp) +- [COBOL](uwu.cbl) - [D](uwu.d) - [Elixir](uwu.ex) - [Emojicode](uwu.emojic) diff --git a/uwu.cbl b/uwu.cbl new file mode 100644 index 0000000..414c9fc --- /dev/null +++ b/uwu.cbl @@ -0,0 +1,5 @@ +IDENTIFICATION DIVISION. +PROGRAM-ID. UWU. +PROCEDURE DIVISION. +DISPLAY 'uwu'. +STOP RUN.