Added testscript

git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@723 f25d12d1-65f4-0310-ae8a-bbce733d8d8e

modeq/test_codegen/Makefile

@@ -12,39 +12,3 @@ ODIR = obj
 BDIR = bin
 
 
-MOFILES = \
-	algorithm_for1.mo \
-	algorithm_if1.mo \
-	algorithm_while1.mo \
-	expression_if1.mo \
-	expression_matrix_vector_product1.mo \
-	expression_range1.mo
-
-TARGETS = $(MOFILES:.mo=)
-OBJS = $(MOFILES:%.mo=%.main.o)
-GENC = $(MOFILES:%.mo=%.c)
-
-all : $(MOFILES:.mo=) 
-
-
-$(TARGETS) : % : %.main.o
-	gcc -o $@ $(LDFLAGS) $< -lc_runtime
-
-$(OBJS) : %.main.o : %.c main.c
-	@echo compiling $(subst .main.o,,$@)
-	@$(CC) $(CFLAGS) \
-	-DCFILE_TO_INCLUDE="\"$(subst .main.o,.c,$@)\""\
-	 -DCFUNCTION_TO_CALL="$(subst .main.o,,$@)_read_call_write"\
-	 -c -o $@ main.c
-
-.SUFFIXES: .mo
-
-
-.mo.c:
-	@$(MODEQ) $< +d=codegen > $(<:.mo=.c)
-
-clean :
-	rm -f $(TARGETS)
-	rm -f $(OBJS)
-	rm -f $(GENC)
-	rm -f *~

modeq/test_codegen/Makefile.single

@@ -8,7 +8,7 @@
 MODEQ=../modeq
 CC=gcc
 
-CFLAGS= -Wall -ansi -pedantic -g -I../../c_runtime
+CFLAGS= -W -Wall -ansi -pedantic-errors -Werror -g -I../../c_runtime
 
 LDFLAGS= -L../../c_runtime -lm
 

modeq/test_codegen/input_variable_size_array.mo

@@ -0,0 +1,14 @@
+
+function input_variable_size_array
+
+  input Real[:] x;
+  output Real[size(x,1)] y;
+
+algorithm
+
+  y := x;
+
+end input_variable_size_array;
+
+model mo
+end mo;

modeq/test_codegen/misc_simplex2.mo

@@ -72,7 +72,7 @@ algorithm
 
 
     if (q < M+1) and (p < N+1) then
-      a := pivot(a,p,q);
+      a := pivot2(a,p,q);
     end if;
 
   end while;

modeq/test_codegen/rtest.sh

@@ -0,0 +1,21 @@
+#!/sw/gnu/bin/bash
+
+function do_one() 
+{
+
+    if make -f Makefile.single TARGET=${mo/%.mo/} clean all > /dev/null 2> /dev/null;
+    then echo OK;
+    else echo failed;
+    fi
+
+
+}
+
+points='....................................................... '
+
+for mo in *.mo; do {
+    echo -n ${mo} ${points:${#mo}} ' '
+    do_one
+
+
+} done