Skip to content

COBOL source code compatible with 'Rocket COBOL' ported from the web

Notifications You must be signed in to change notification settings

spgennard/rocket-cobol-ports

Folders and files

NameName
Last commit message
Last commit date

Latest commit

 

History

25 Commits
 
 
 
 
 
 
 
 
 
 
 
 
 
 

Repository files navigation

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

About

COBOL source code compatible with 'Rocket COBOL' ported from the web

Resources

Stars

Watchers

Forks

Releases

No releases published

Packages

No packages published

Languages