mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-24 05:21:20 -08:00
Code Issues Projects Releases Packages Wiki Activity

Renamed the array limit constants: ADIMLIM, ATOTLIM, ARANKLIM, to ECL_ARRAY_{DIMENSION,TOTAL,RANK}_LIMIT

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2012-06-12 21:43:32 +02:00
parent 95aaab87a5
commit dac086195d
8 changed files with 28 additions and 24 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/c/printer/write_array.d
View file

@ -23,7 +23,7 @@ write_array_inner(bool vector, cl_object x, cl_object stream)
{
cl_env_ptr env = ecl_process_env();
const cl_index *adims;
cl_index subscripts[ARANKLIM];
cl_index subscripts[ECL_ARRAY_RANK_LIMIT];
cl_fixnum n, j, m, k, i;
cl_fixnum print_length;
cl_fixnum print_level;