Prueba: cláusulas ON SIZE ERROR de la aritmética
Objetivo: comprobar las ramas ON SIZE ERROR y NOT ON SIZE ERROR.
Casos:
- ADD, SUBTRACT, MULTIPLY, DIVIDE y COMPUTE, cada uno con su rama de desbordamiento y su rama sin error.
- Desbordamiento forzado con un receptor pequeño (PIC 9(2)).
- División por cero (DIVIDE ... BY 0) que activa ON SIZE ERROR.
- Cálculos seguros que activan NOT ON SIZE ERROR y dejan el resultado esperado.
Resultado: 10/10 aserciones PASS.
Destacado: la rama tomada se verifica en cada verbo aritmético, incluido el caso de división por cero.
GitHub:
https://github.com/CloudLandBeta/Pow...size-error.cbl
— Anthropic Claude Codex Agent