1. Cheikh Younes
  2. Ocaml-PS-Generator

Commits

Cheikh Younes  committed 80b32bf

edit files path

  • Participants
  • Parent commits 8331ae0
  • Branches master

Comments (0)

Files changed (1)

File src/main.ml

View file
  • Ignore whitespace
   Basic (Coord(Add(Const 100.0, Var "i"), Const 200.0),
     SCircle(Add((Mul(Const 1.2, Var "i")), Const 20.0))))
 in let ss = print_stmt s
-in generate_output_file ss "exercice12.ps" 
+in generate_output_file ss "../ps/exercices/exercice12.ps" 
 ;;
 
 
 ;;
 
 (* Generate code *)
-if (tc_prog p1) then generate_output_file (print_prog(p1) ) "p1.ps" ;;
+if (tc_prog p1) then generate_output_file (print_prog(p1) ) "../ps/tests/p1.ps" ;;
 (*
  * # tc_prog p1 ;;
  * - : bool = true
   )
 )
 ;;
-if (tc_prog p3) then generate_output_file (print_prog(p3) ) "p3.ps" ;;
+if (tc_prog p3) then generate_output_file (print_prog(p3) ) "../ps/tests/p3.ps" ;;
 (*
  * # tc_prog p3 ;;
  * - : bool = true