// Print the continued fraction of a real number.

// We work with real numbers and integers.
#include <cln/real.h>
#include <cln/integer.h>

// We do I/O.
#include <cln/io.h>
#include <cln/integer_io.h>

using namespace std;
using namespace cln;

// Our private error handling: return to the main program.
#include <csetjmp>
jmp_buf restartpoint;
namespace cln {
	void cl_abort (void) { longjmp(restartpoint,1); }
}

int main (int argc, char* argv[])
{
	for (int i = 1; i < argc; i++) {
		const char * arg = argv[i];
		if (setjmp(restartpoint))
			continue;
		// Convert argument to its internal representation:
		cl_R x = arg;
		// Check sign.
		if (minusp(x)) {
			cout << '-';
			x = -x;
		}
		cout << "[";
		const char* separator = "; ";
		for (;;) {
			// Split x into integral and fractional part.
			cl_R_div_t x_split = floor2(x);
			cout << x_split.quotient;
			x = x_split.remainder;
			if (zerop(x))
				break;
			cout << separator;
			separator = ", ";
			// Invert x.
			x = recip(x);
		}
		cout << ']' << endl;
	}
}


syntax highlighted by Code2HTML, v. 0.9.1