`error'
-------

error(MESSAGE)
     :: $B%W%m%0%i%`Cf$G6/@)E*$K%(%i!<$rH/@8$5$;$k(B.

MESSAGE
     $BJ8;zNs(B

   * $B0lHL$K(B, $B0z?t$N4V0c$$$J$I(B, $BB39TIT2DG=$J%(%i!<$,AH$_9~$_H!?t$K$*$$$F(B
     $BH/@8$7$?;~(B, $B%H%C%W%l%Y%k$KLa$kA0$K(B, $B2DG=$J$i$P$=$N%(%i!<$N;~E@$G(B
     $B%G%P%C%0%b!<%I$KF~$k(B. `error()' $B$O(B, $B%f!<%6H!?t$NFbIt$G$3$N(B
     $BF0:n$HF1MM$NF0:n$r9T$o$;$k$?$a$NH!?t$G$"$k(B.

   * $B0z?t$O(B, `error()' $B$,8F$S=P$5$l$k:]$KI=<($5$l$k%a%C%;!<%8$G(B,
     $BJ8;zNs$G$"$k(B.

   * $B%f!<%6H!?t$K$*$$$F(B, $BJQ?t$r%A%'%C%/$7$F(B, $B$"$jF@$J$$CM$N>l9g$K(B
     `error()' $B$r8F$S=P$9$h$&$K$7$F$*$1$P(B,
     $B$=$N;~E@$G<+F0E*$K%G%P%C%0%b!<%I$KF~$l$k(B.

     % cat mod3
     def mod3(A) {
             if ( type(A) >= 2 )
                     error("invalid argument");
             else
                     return A % 3;
     }
     end$
     % asir
     [0] load("mod3");
     1
     [3] mod3(5);
     2
     [4] mod3(x);
     invalid argument
     stopped in mod3 at line 3 in file "./mod3"
     3                       error("invalid argument");
     (debug) print A
     A = x
     (debug) quit
     return to toplevel
     [4]

$B;2>H(B
     *Note `debug': debug.

