Expected results for test: P3-18.pl460

P3-18.pl460 :

(define (main)
	(display (append (append (cons 0 (cdr '(3 5 5))) (cons 1 (cddr '(3 5 5)))) (cons 0 (cdr '(3 5 5)))))
	(newline)
	(display (append (cons (cadr '(3 5 5)) '( 6 7 8)) (cons (cddr '(3 5 5)) '( 6 7 8))))
	(newline)
)

(main)

Input file: P3-18.pl460

0 errors found in input file
P3-18.cpp :

// Autogenerated PL460 to C++ Code
// File: P3-18.cpp

#include <iostream>
#include "Object.h"
using namespace std;


int main ()
{
	Object __RetVal;
	cout << listop ("append", listop ("append", listop ("cons", Object("0"), listop ("cdr", Object("(3 5 5 )"))), listop ("cons", Object("1"), listop ("cddr", Object("(3 5 5 )")))), listop ("cons", Object("0"), listop ("cdr", Object("(3 5 5 )"))));
	cout << endl;
	cout << listop ("append", listop ("cons", listop ("cadr", Object("(3 5 5 )")), Object("(6 7 8 )")), listop ("cons", listop ("cddr", Object("(3 5 5 )")), Object("(6 7 8 )")));
	cout << endl;
	return 0;
}

PL460 program output: 

(0 5 5 1 5 0 5 5)
(5 6 7 8 (5) 6 7 8)

C++ program output: 

(0 5 5 1 5 0 5 5)
(5 6 7 8 (5) 6 7 8)

Differences:			      < pl460 | cpp >

(0 5 5 1 5 0 5 5)				(0 5 5 1 5 0 5 5)
(5 6 7 8 (5) 6 7 8)				(5 6 7 8 (5) 6 7 8)