ecl компиляция

$ ecl
ECL (Embeddable Common-Lisp) 12.7.1 (git:UNKNOWN)
Copyright (C) 1984 Taiichi Yuasa and Masami Hagiya
Copyright (C) 1993 Giuseppe Attardi
Copyright (C) 2000 Juan J. Garcia-Ripoll
ECL is free software, and you are welcome to redistribute it
under certain conditions; see file 'Copyright' for details.
Type :h for Help.  
Top level in: #<process TOP-LEVEL>.
> (print "введите А и Б")

"введите А и Б" 
"введите А и Б"
>

/*	Compiler: ECL 11.1.1                                          */
/*	Date: 2012/12/31 13:09 (yyyy/mm/dd)                           */
/*	Machine: Linux 3.2.0-35-generic x86_64                        */
/*	Source: new.cl                                                */
#include <ecl/ecl-cmp.h>
#include "new.h"
	
#include "new.data"
#ifdef __cplusplus
extern "C"
#endif
ECL_DLLEXPORT void init_fas_CODE(cl_object flag)
{ VT1 VLEX1 CLSR1 STCK1
	const cl_env_ptr cl_env_copy = ecl_process_env();
	cl_object value0;
	cl_object *VVtemp;
	if (!FIXNUMP(flag)){
	Cblock=flag;
	#ifndef ECL_DYNAMIC_VV
	flag->cblock.data = VV;
	#endif
	flag->cblock.data_size = VM;
	flag->cblock.temp_data_size = VMtemp;
	flag->cblock.data_text = compiler_data_text;
	flag->cblock.data_text_size = compiler_data_text_size;
	flag->cblock.cfuns_size = compiler_cfuns_size;
	flag->cblock.cfuns = compiler_cfuns;
	flag->cblock.source = make_constant_base_string("/home/algiz/coding/Lisp/new.cl");
	return;}
	#ifdef ECL_DYNAMIC_VV
	VV = Cblock->cblock.data;
	#endif
	Cblock->cblock.data_text = "@EcLtAg:init_fas_CODE@";
	VVtemp = Cblock->cblock.temp_data;
	ecl_print(VVtemp[0],Cnil);
	{cl_object V1;                            /*  LET0            */
	cl_object V2;                             /*  LET1            */
	V1= cl_read(0)                            /*  READ            */;
	V2= cl_read(0)                            /*  READ            */;
	T0= ecl_plus(V1,V2);
	ecl_print(T0,Cnil);
	}
	(void)si_quit(0)                          /*  QUIT            */;
}

#ifdef ECL_DYNAMIC_VV
static cl_object *VV;
#else
static cl_object VV[VM];
#endif

#ifdef __cplusplus
extern "C" {
#endif
#define VT1 cl_object T0;
#define VLEX1
#define CLSR1
#define STCK1
static cl_object Cblock;
#define VM1 1
#define VM 0
#define VMtemp 1
#ifdef __cplusplus
}
#endif
/*
 * Exported Lisp functions
 */
#define compiler_cfuns_size 0
#define compiler_cfuns NULL

static const char compiler_data_text[] = 
"\"\2062\2062\2065\2064\2070\2102\2065 \2020 \2070 \2021\") ";
#define compiler_data_text_size 17