Awesome
rocket-cobol-ports - Directory
COBOL source code compatible with 'Rocket COBOL' ported from the web
Description | Original Source | Directory | Minimum Version |
---|---|---|---|
Eliza in Rocket COBOL | eliza.cbl | eliza | 9.0 |
Prime Machine | prime_machiine.cob | prime_machine | - |
raylib_painter | CobolDraw.cob | raylib_painter | - |
cobsha3 | cobsha3 | cobsha3 | - |
star trek | ctrek.com | star_trek | - |
cobdes | cobdes | cobdes |
Eliza
Changes made:
- Removed used of non-portable "FUNCTION SUBSTITUTE"
- Change either to "INSPECT REPLACING" if src/target are same length or custom section
prime_machine
Changes made:
- USAGE is reserved word and cannot be used a symbolic constant
- remove >>elif, as it is not portable and use >>evaluate
- replace non-portable copybook reference and use local 78' items
raylib_painter
Changes made;
- 'values' on redefines is non-portable
- literal's passed to 'C' need to be zero terminated, so use z"..."
- convert "returning omitted" to CALL no-return-code
- add .h and used h2py to weed-out any parameter call'ing issues
- fix memory leak in 'C' code
cobsha3
Changes made:
- binary-int is not portable changed to binary-long
- use of "" within quotes is not portable
- replace FUNCTION STORED-CHAR-LENGTH with portable code
- program-id's with "-" in the name are non-portable, so change them
- create a shared library
TODO:
- Convert TES* source to a proper unit test