求助各位大佬，下面的代码哪里出现了错误，在vivado上仿真不通过

xiaozhubanna

ALU:
module ALU(CTRL,A,B,Q,Code);
input CTRL;
input A;
, I5 g0 d: Q: f1 }input B;
5 n0 q; Z: j3 N; Routput Q;
input[2:0] Code;
if (CTLR === 0)
+ [% s( F, V: {( W   Q = 0;
/ }2 D: R8 z& _3 b/ N7 Lelse
   case(Code)
+ ~2 q2 z- f. O) v) T8 ?     3'b000: Q = A+1;
     3'b001: Q = A+B+1;
     3'b010: Q = A;
+ J9 b# J% r5 a% }6 I- V* ~0 H     3'b011: Q = A+B;
! j* \! s! j4 X% Z, i. E     3'b100: Q = A-1;
+ G  p4 ]0 J! w4 w! p+ {     3'b101: Q = A-B;
     3'b110: Q = B;
# Y. w4 d3 v4 ^! Y4 Y2 R' Y5 `     default: Q = A-B-1;
9 L7 r" d. k2 ^9 f  W   endcase
endmodule
# {; H8 T, {8 i% [
. p2 N6 h+ Q9 P. ~! ^6 \* T
, W$ E$ c& l$ O1 \6 w2 S! Ttestbench:
module ALU_tb();
' ^: `! ^) B9 u) Lreg A,B,CTRL;
# y% w; F+ h9 O7 P: rwire Q;
# ~/ v: s& t; }# [! ?( Ireg[2:0] Code;
0 l# E% R4 O5 q: W9 q' U$ Rinteger case_num;
initial begin
  CTRL=0;
  case_num = 1;
  A=1 'b0;
, D% G  g& |  J; z2 ?  B=1 'b1;
  #100;
  if(Q==0)
. E0 A& M; v  x/ ^5 o  G) D, s  $display("[Simulation Info] Case %2d PASS.",case_num);
  else
  X3 e% n4 A  D' X! J   $display("[Simulation Info] Case %2d ERROR.",case_num);
   #100;
   CTRL=1;
9 q. s0 Q/ t, {, y. _   case_num = 2;
" q1 ~' K( k5 t& i   A= 1 'b1;
   B= 1 'b0;
; A- e9 x* P% O8 g   Code = 3 'b000;
   #20;
! x4 ]  R! l9 [; k9 x    if(Q==0)
  @8 r  `5 d# J1 E- D7 D7 y  $display("[Simulation Info] Case %2d PASS.",case_num);
  else
2 n0 u4 x6 G+ s( h, ?   $display("[Simulation Info] Case %2d ERROR.",case_num);
   #100;
1 D' @, }+ W1 ^6 Y' r9 W; d) ^  Q/ G   case_num = 3;
& i( N: o/ B& R# R   Code = 3 'b001;
   #20;
    if(Q==0)
# D3 X& h- h' C  $display("[Simulation Info] Case %2d PASS.",case_num);
; v2 k$ n; P  C" L0 U- |  else
   $display("[Simulation Info] Case %2d ERROR.",case_num);
   #100;
  @; x8 I0 [- q. y3 Y" o3 x    case_num = 4;
   Code = 3 'b010;
   #20;
    if(Q==1)
% {2 b. o" K8 S& h: \) L1 F  $display("[Simulation Info] Case %2d PASS.",case_num);
  else
& ]- U, R2 p) J, J! l& L   $display("[Simulation Info] Case %2d ERROR.",case_num);
   #100;
  H; w& k' n- ~  Y    case_num = 5;
- ?3 H7 ]1 n7 {. c. d0 A% s   Code = 3 'b011;
7 b3 J! F) s- j4 c" ]1 Y   #20;
* S3 E) s5 v& x' q' O3 @1 [' x  }1 F' Z    if(Q==1)
  $display("[Simulation Info] Case %2d PASS.",case_num);
4 m( ?: d& B% o: H8 f9 d4 W- k  else
1 X1 G9 K2 {8 B5 T+ F  P   $display("[Simulation Info] Case %2d ERROR.",case_num);
) a; g9 W& e7 e, Y9 _   #100;
    case_num = 6;
   Code = 3 'b100;
   #20;
$ X" r# s1 s, ]6 `* h% ?! E* H    if(Q==0)
  $display("[Simulation Info] Case %2d PASS.",case_num);
  else
   $display("[Simulation Info] Case %2d ERROR.",case_num);
! e1 E: R% o, ]% ~/ P6 ^   #100;
+ Y) m7 d# n7 ^$ n    case_num = 7;
1 D; J7 C$ S# E* q5 f+ g2 B   Code = 3 'b101;
7 L: K7 k: ?* L& N; a, a  Q: d* B   #20;
    if(Q==1)
  $display("[Simulation Info] Case %2d PASS.",case_num);
/ K: O5 B/ o% C5 {( C  else
' e! F0 R/ w  O1 `3 m2 B3 A  l   $display("[Simulation Info] Case %2d ERROR.",case_num);
   #100;
    case_num = 8;
   Code = 3 'b110;
2 g% y( i6 M: ?7 @1 z   #20;
    if(Q==0)
2 T. u5 i) }& Z' Q  $display("[Simulation Info] Case %2d PASS.",case_num);
  else
+ k6 M( a' c# p8 x0 X6 b   $display("[Simulation Info] Case %2d ERROR.",case_num);
3 Z$ b: b% h. `) h( [4 D   #100;
    case_num = 9;
. c( T( Y- s( N6 Z   Code = 3 'b111;
   #20;
' z0 g8 x8 I& p9 {: M    if(Q==0)
  $display("[Simulation Info] Case %2d PASS.",case_num);
  else
   $display("[Simulation Info] Case %2d ERROR.",case_num);
3 [' Z8 m& W* r3 f5 M5 v$ j8 I( r3 p   #100;
   $finish;
$ T) [* d0 Z3 u/ x; P end
6 Q$ l" O  v2 V8 |1 ]/ s: kendmodule