From 3ee1182cffd52db44f3aefd7e84fc6c91651a55b Mon Sep 17 00:00:00 2001 From: Matt Decker Date: Sun, 26 Jun 2022 08:53:14 -0500 Subject: [PATCH] Delete COBOL/mf directory --- COBOL/mf/src/.cobolProj | 169 ------------------------------- COBOL/mf/src/.gitignore | 2 - COBOL/mf/src/.project | 17 ---- COBOL/mf/src/GildedRose.cbl | 72 ------------- COBOL/mf/test/.cobolProj | 157 ---------------------------- COBOL/mf/test/.gitignore | 3 - COBOL/mf/test/.project | 23 ----- COBOL/mf/test/TestGildedRose.cbl | 67 ------------ 8 files changed, 510 deletions(-) delete mode 100644 COBOL/mf/src/.cobolProj delete mode 100644 COBOL/mf/src/.gitignore delete mode 100644 COBOL/mf/src/.project delete mode 100644 COBOL/mf/src/GildedRose.cbl delete mode 100644 COBOL/mf/test/.cobolProj delete mode 100644 COBOL/mf/test/.gitignore delete mode 100644 COBOL/mf/test/.project delete mode 100644 COBOL/mf/test/TestGildedRose.cbl diff --git a/COBOL/mf/src/.cobolProj b/COBOL/mf/src/.cobolProj deleted file mode 100644 index b47b56d0..00000000 --- a/COBOL/mf/src/.cobolProj +++ /dev/null @@ -1,169 +0,0 @@ - - - - - - - - - - - - - - - - - - false - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - diff --git a/COBOL/mf/src/.gitignore b/COBOL/mf/src/.gitignore deleted file mode 100644 index eea4e81d..00000000 --- a/COBOL/mf/src/.gitignore +++ /dev/null @@ -1,2 +0,0 @@ -.cobolBuild -/Gilded_Rose.bin/ diff --git a/COBOL/mf/src/.project b/COBOL/mf/src/.project deleted file mode 100644 index a702b492..00000000 --- a/COBOL/mf/src/.project +++ /dev/null @@ -1,17 +0,0 @@ - - - Gilded Rose - - - - - - com.microfocus.eclipse.project.cobolBuilder - - - - - - com.microfocus.eclipse.project.cobolNature - - diff --git a/COBOL/mf/src/GildedRose.cbl b/COBOL/mf/src/GildedRose.cbl deleted file mode 100644 index 28ff10a2..00000000 --- a/COBOL/mf/src/GildedRose.cbl +++ /dev/null @@ -1,72 +0,0 @@ -program-id. GildedRose as "GildedRose". - -file-control. - select in-items assign 'in-items'. - select items assign 'items'. - -data division. -file section. - fd in-items. - 01 in-item pic x(58). - fd items. - 01 item. - 02 sell-in pic 9(4). - 02 quality pic 9(4). - 02 name pic x(50). - -working-storage section. -procedure division. - open input in-items output items. -start-lable. - read in-items end go to end-lable. - move in-item to item. - if name not equal "Aged Brie" and name not equal "Backstage passes to a TAFKAL80ETC concert" - if quality greater then 0 - if name not equal to "Sulfuras, Hand of Ragnaros" - compute quality = quality - 1 - end-if - end-if - else - if quality is less then 50 - compute quality = quality + 1 - if name equals "Backstage passes to a TAFKAL80ETC concert" - if sell-in less then 11 - if quality less then 50 - compute quality = quality + 1 - end-if - end-if - if sell-in less then 6 - if quality less then 50 - compute quality = quality + 1 - end-if - end-if - end-if - end-if - end-if - if name not equal "Sulfuras, Hand of Ragnaros" - compute sell-in = sell-in - 1 - end-if - if sell-in is less then 0 - if name is not equal to "Aged Brie" - if name is not equal to "Backstage passes to a TAFKAL80ETC concert" - if quality is greater then 0 - if name is equal to "Sulfuras, Hand of Ragnaros" - compute quality = quality - 1 - end-if - end-if - else - compute quality = quality - quality - end-if - else - if quality is less then 50 - compute quality = quality + 1 - end-if - end-if - end-if - write item. - go to start-lable. -end-lable. - close items. -goback. - -end program GildedRose. diff --git a/COBOL/mf/test/.cobolProj b/COBOL/mf/test/.cobolProj deleted file mode 100644 index 53304fe0..00000000 --- a/COBOL/mf/test/.cobolProj +++ /dev/null @@ -1,157 +0,0 @@ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - false - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - diff --git a/COBOL/mf/test/.gitignore b/COBOL/mf/test/.gitignore deleted file mode 100644 index 21774bfb..00000000 --- a/COBOL/mf/test/.gitignore +++ /dev/null @@ -1,3 +0,0 @@ -/.cobolBuild -/Coverage/ -/Tests.bin/ diff --git a/COBOL/mf/test/.project b/COBOL/mf/test/.project deleted file mode 100644 index 2615ee47..00000000 --- a/COBOL/mf/test/.project +++ /dev/null @@ -1,23 +0,0 @@ - - - Tests - - - - - - com.microfocus.eclipse.project.cobolBuilder - - - - - com.microfocus.eclipse.mfunit.core.mfUnitBuilder - - - - - - com.microfocus.eclipse.project.cobolNature - com.microfocus.eclipse.mfunit.core.mfUnitNature - - diff --git a/COBOL/mf/test/TestGildedRose.cbl b/COBOL/mf/test/TestGildedRose.cbl deleted file mode 100644 index d9802330..00000000 --- a/COBOL/mf/test/TestGildedRose.cbl +++ /dev/null @@ -1,67 +0,0 @@ - *> Test Fixture for GildedRose, GildedRose - - copy "mfunit_prototypes.cpy". - - program-id. TestGildedRose. - - file-control. - select in-items assign 'in-items'. - select items assign 'items'. - - file section. - fd in-items. - 01 in-item. - 02 sell-in pic 9(4). - 02 quality pic 9(4). - 02 name pic x(50). - fd items. - 01 item. - 02 sell-in pic 9(4). - 02 quality pic 9(4). - 02 name pic x(50). - - working-storage section. - copy "mfunit.cpy". - 78 TEST-TESTGILDEDROSE value "TestGildedRose". - 01 pp procedure-pointer. - - *> Program linkage data - - procedure division. - goback returning 0 - . - - entry MFU-TC-PREFIX & TEST-TESTGILDEDROSE. - open output in-items - move "foo" to name in in-item - move 0 to quality in in-item - move 0 to sell-in in in-item - write in-item - close in-items - call "GildedRose" - open input items - read items - if name in item not equal to "fixme" then - call MFU-ASSERT-FAIL-Z using z"item name was not fixme" - close items - goback - . - - $region TestCase Configuration - - entry MFU-TC-SETUP-PREFIX & TEST-TESTGILDEDROSE. - perform InitializeLinkageData - *> Add any other test setup code here - goback returning 0 - . - - InitializeLinkageData section. - *> Load the library that is being tested - set pp to entry "GildedRose" - - exit section - . - - $end-region - - end program.