Expected results for test: P3-08.pl460

P3-08.pl460 :

(define (main)
	(display (car '((0 1 2) (3 5 5) 7)))
	(newline)
	(display (cdr '((0 1 2) (3 5 5) 7)))
	(newline)
	(display (caar '((0 1 2) (3 5 5) 7)))
	(newline)
	(display (cdar '((0 1 2) (3 5 5) 7)))
	(newline)
	(display (caar '((0 1 2) (3 5 5) 7)))
	(newline)
	(display (cdar '((0 1 2) (3 5 5) 7)))
	(newline)
	(display (cadr '((0 1 2) (3 5 5) 7)))
	(newline)
	(display (cddr '((0 1 2) (3 5 5) 7)))
	(newline)
)

(main)

Input file: P3-08.pl460

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

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

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


int main ()
{
	Object __RetVal;
	cout << listop ("car", Object("((0 1 2 ) (3 5 5 ) 7 )"));
	cout << endl;
	cout << listop ("cdr", Object("((0 1 2 ) (3 5 5 ) 7 )"));
	cout << endl;
	cout << listop ("caar", Object("((0 1 2 ) (3 5 5 ) 7 )"));
	cout << endl;
	cout << listop ("cdar", Object("((0 1 2 ) (3 5 5 ) 7 )"));
	cout << endl;
	cout << listop ("caar", Object("((0 1 2 ) (3 5 5 ) 7 )"));
	cout << endl;
	cout << listop ("cdar", Object("((0 1 2 ) (3 5 5 ) 7 )"));
	cout << endl;
	cout << listop ("cadr", Object("((0 1 2 ) (3 5 5 ) 7 )"));
	cout << endl;
	cout << listop ("cddr", Object("((0 1 2 ) (3 5 5 ) 7 )"));
	cout << endl;
	return 0;
}

PL460 program output: 

(0 1 2)
((3 5 5) 7)
0
(1 2)
0
(1 2)
(3 5 5)
(7)

C++ program output: 

(0 1 2)
((3 5 5) 7)
0
(1 2)
0
(1 2)
(3 5 5)
(7)

Differences:			      < pl460 | cpp >

(0 1 2)						(0 1 2)
((3 5 5) 7)					((3 5 5) 7)
0						0
(1 2)						(1 2)
0						0
(1 2)						(1 2)
(3 5 5)						(3 5 5)
(7)						(7)