version 1.11, 2003/04/19 15:44:58 |
version 1.18, 2003/12/21 17:36:29 |
|
|
@comment $OpenXM: OpenXM/src/asir-doc/parts/builtin/misc.texi,v 1.10 2002/09/03 01:50:59 noro Exp $ |
@comment $OpenXM: OpenXM/src/asir-doc/parts/builtin/misc.texi,v 1.17 2003/12/18 10:26:20 ohara Exp $ |
\BJP |
\BJP |
@node $B$=$NB>(B,,, $BAH$_9~$_H!?t(B |
@node $B$=$NB>(B,,, $BAH$_9~$_H!?t(B |
@section $B$=$NB>(B |
@section $B$=$NB>(B |
|
|
* time:: |
* time:: |
* cputime tstart tstop:: |
* cputime tstart tstop:: |
* timer:: |
* timer:: |
|
* currenttime:: |
|
* sleep:: |
* heap:: |
* heap:: |
* version:: |
* version:: |
* shell:: |
* shell:: |
Line 84 off $B$N;~(B, $BF~NO$5$l$?IbF0>.?t$O(B, $BG\@:EYI |
|
Line 86 off $B$N;~(B, $BF~NO$5$l$?IbF0>.?t$O(B, $BG\@:EYI |
|
@xref{$B%3%^%s%I%i%$%s%*%W%7%g%s(B}. |
@xref{$B%3%^%s%I%i%$%s%*%W%7%g%s(B}. |
@item verbose |
@item verbose |
on $B$N;~(B, $BH!?t$N:FDj5A;~$K%a%C%;!<%8$rI=<($9$k(B. |
on $B$N;~(B, $BH!?t$N:FDj5A;~$K%a%C%;!<%8$rI=<($9$k(B. |
|
@item quiet_mode |
|
1 $B$N$H$-(B, $B5/F0;~$KCx:n8"I=<($r9T$o$J$$(B. |
|
@xref{$B%3%^%s%I%i%$%s%*%W%7%g%s(B}. |
|
@item prompt |
|
0 $B$N$H$-%W%m%s%W%H$rI=<($7$J$$(B. 1 $B$N$H$-I8=`%W%m%s%W%H$rI=<((B. |
|
C $B%9%?%$%k$N%U%)%^%C%HJ8;zNs$r$b$A$$$k$H%f!<%6Dj5A$N%W%m%s%W%H(B. |
|
$BNc(B(asirgui $B$G$OIT2D(B): |
|
@code{ ctrl("prompt","\033[32m[%d]:= \033[0m")} |
@item hex |
@item hex |
1 $B$N$H$-(B, $B@0?t$O(B 0x $B$G;O$^$k(B 16 $B?J?t$H$7$FI=<($5$l$k(B. -1 $B$N$H$-(B, 16 $B?J?t$O(B, |
1 $B$N$H$-(B, $B@0?t$O(B 0x $B$G;O$^$k(B 16 $B?J?t$H$7$FI=<($5$l$k(B. -1 $B$N$H$-(B, 16 $B?J?t$O(B, |
$B4V$K(B @samp{|} $B$r$O$5$s$G(B 8 $B7e$4$H$K6h@Z$C$FI=<($5$l$k(B. |
$B4V$K(B @samp{|} $B$r$O$5$s$G(B 8 $B7e$4$H$K6h@Z$C$FI=<($5$l$k(B. |
|
@item real_digit |
|
$BG\@:EYIbF0>.?t$NI=<($N7e?t$r;XDj$9$k(B. |
|
@item double_output |
|
1 $B$N$H$-(B, $BG\@:EYIbF0>.?t$O$D$M$K(B ddd.ddd $B$N7A$GI=<($5$l$k(B. |
@item fortran_output |
@item fortran_output |
1 $B$N$H$-(B, $BB?9`<0$NI=<($,(B FORTRAN $B%9%?%$%k$K$J$k(B. $B$9$J$o$AQQ$,(B |
1 $B$N$H$-(B, $BB?9`<0$NI=<($,(B FORTRAN $B%9%?%$%k$K$J$k(B. $B$9$J$o$AQQ$,(B |
@samp{^} $B$NBe$o$j$K(B @samp{**} $B$GI=$5$l$k(B. |
@samp{^} $B$NBe$o$j$K(B @samp{**} $B$GI=$5$l$k(B. |
Line 150 and as a result, the frequency of garbage collection d |
|
Line 164 and as a result, the frequency of garbage collection d |
|
@xref{Command line options}. |
@xref{Command line options}. |
@item verbose |
@item verbose |
If `on' a warning messages is displayed when a function is redefined. |
If `on' a warning messages is displayed when a function is redefined. |
|
@item quiet_mode |
|
If 1 is set, the copyright notice has been displayed at boot time. |
|
@item prompt |
|
If the value is 0, then prompt is not output. |
|
If the value is 1, then the standard prompt is output. |
|
Asir prompt can be customized by giving a C-style format string. |
|
Example (for unix asir); |
|
@code{ ctrl("prompt","\033[32m[%d]:= \033[0m")} |
|
|
@item hex |
@item hex |
If 1 is set, integers are displayed as hexadecimal numbers with prefix |
If 1 is set, integers are displayed as hexadecimal numbers with prefix |
@code{0x}. if -1 is set, hexadecimal numbers are desplayed with |
@code{0x}. if -1 is set, hexadecimal numbers are displayed with |
@samp{|} inserted at every 8 hexadecimal digits. |
@samp{|} inserted at every 8 hexadecimal digits. |
|
@item real_digit |
|
Sets the number of digits used to print a floating double. |
|
@item double_output |
|
If set to 1, any floating double is printed in the style ddd.ddd. |
@item fortran_output |
@item fortran_output |
If `on' polynomials are displayed in FORTRAN style. That is, a power |
If `on' polynomials are displayed in FORTRAN style. That is, a power |
is represented by @samp{**} instead of @samp{^}. |
is represented by @samp{**} instead of @samp{^}. |
Line 463 for a reply to interruption prompting are added to the |
|
Line 490 for a reply to interruption prompting are added to the |
|
@table @t |
@table @t |
\JP @item $B;2>H(B |
\JP @item $B;2>H(B |
\EG @item References |
\EG @item References |
@fref{cputime tstart tstop}. |
@fref{cputime tstart tstop}, @fref{currenttime}. |
@end table |
@end table |
|
|
\JP @node cputime tstart tstop,,, $B$=$NB>(B |
\JP @node cputime tstart tstop,,, $B$=$NB>(B |
Line 560 the debug-mode and execute @code{cputime(1)}. |
|
Line 587 the debug-mode and execute @code{cputime(1)}. |
|
@table @t |
@table @t |
\JP @item $B;2>H(B |
\JP @item $B;2>H(B |
\EG @item References |
\EG @item References |
@fref{time}, @fref{ctrl}. |
@fref{time}, @fref{currenttime}, @fref{ctrl}. |
@end table |
@end table |
|
|
\JP @node timer,,, $B$=$NB>(B |
\JP @node timer,,, $B$=$NB>(B |
Line 571 the debug-mode and execute @code{cputime(1)}. |
|
Line 598 the debug-mode and execute @code{cputime(1)}. |
|
@table @t |
@table @t |
@item timer(@var{interval},@var{expr},@var{val}) |
@item timer(@var{interval},@var{expr},@var{val}) |
\JP :: $B@)8B;~4V$D$-$G7W;;$r<B9T$9$k(B. |
\JP :: $B@)8B;~4V$D$-$G7W;;$r<B9T$9$k(B. |
\BEG |
\EG :: Compute an expression under the interval timer. |
:: Compute an expression under the interval timer. |
|
\E |
|
@end table |
@end table |
|
|
@table @var |
@table @var |
Line 628 interval timer expired (VTALRM) |
|
Line 653 interval timer expired (VTALRM) |
|
[11] |
[11] |
@end example |
@end example |
|
|
|
\JP @node currenttime,,, $B$=$NB>(B |
|
\EG @node currenttime,,, Miscellaneouses |
|
@subsection @code{currenttime} |
|
@findex currenttime |
|
|
|
@table @t |
|
@item currenttime() |
|
\JP :: $B8=:_;~9o$r<hF@(B |
|
\EG :: Get current time. |
|
@end table |
|
|
|
@table @var |
|
@item return |
|
\JP 1970$BG/(B1$B7n(B1$BF|(B0$B;~(B0$BJ,(B0$BIC$+$i$N7P2aIC?t(B. |
|
\EG UNIX time. |
|
@end table |
|
|
|
@itemize @bullet |
|
|
|
@item |
|
\JP @code{currenttime()} $B$O8=:_;~9o$rJV$9(B. UNIX $B$N>l9g(B, time(3) $B$r8F$s$G$$$k$@$1$G$"$k(B. |
|
\EG See also time(3) in UNIX manuals. |
|
|
|
@end itemize |
|
|
|
@example |
|
[0] currenttime(); |
|
1071639228 |
|
[1] |
|
@end example |
|
|
|
\JP @node sleep,,, $B$=$NB>(B |
|
\EG @node sleep,,, Miscellaneouses |
|
@subsection @code{sleep} |
|
@findex sleep |
|
|
|
@table @t |
|
@item sleep(@var{interval}) |
|
\JP :: $B%W%m%;%9$N<B9T$rDd;_(B |
|
\EG :: Suspend computation for an interval. |
|
@end table |
|
|
|
@table @var |
|
@item return |
|
1 |
|
|
|
@item interval |
|
\JP $BDd;_;~4V(B ($B%^%$%/%mIC(B) |
|
\EG interval (micro second) |
|
@end table |
|
|
|
@itemize @bullet |
|
|
|
@item |
|
\JP @code{sleep()} $B$O(B, $B%W%m%;%9$N<B9T$rDd;_$9$k(B. UNIX $B$N>l9g(B, usleep $B$r8F$s$G$$$k$@$1$G$"$k(B. |
|
\EG See also usleep(3) in UNIX manuals. |
|
|
|
@end itemize |
|
|
|
@example |
|
[0] sleep(1000); |
|
1 |
|
[1] |
|
@end example |
|
|
\JP @node heap,,, $B$=$NB>(B |
\JP @node heap,,, $B$=$NB>(B |
\EG @node heap,,, Miscellaneouses |
\EG @node heap,,, Miscellaneouses |
@subsection @code{heap} |
@subsection @code{heap} |
Line 736 at the activation of @b{Asir}. (@xref{Command line opt |
|
Line 826 at the activation of @b{Asir}. (@xref{Command line opt |
|
@b{Asir} $B$N%P!<%8%g%s$r<+A3?t$GJV$9(B. |
@b{Asir} $B$N%P!<%8%g%s$r<+A3?t$GJV$9(B. |
\E |
\E |
\BEG |
\BEG |
Command @code{version()} returns the version identification number |
@item |
, an integer of @b{Asir} in use. |
Command @code{version()} returns the version identification number, |
|
an integer of @b{Asir} in use. |
\E |
\E |
@end itemize |
@end itemize |
|
|
Line 781 as its return value. |
|
Line 872 as its return value. |
|
|
|
@example |
@example |
[0] shell("ls"); |
[0] shell("ls"); |
alg da katsura ralg suit |
alg da katsura ralg suit |
algt defs.h kimura ratint test |
algt defs.h kimura ratint test |
alpi edet kimura3 robot texput.log |
alpi edet kimura3 robot texput.log |
asir.o fee mfee sasa wang |
asir.o fee mfee sasa wang |
asir_symtab gr mksym shira wang_data |
asir_symtab gr mksym shira wang_data |
base gr.h mp snf1 wt |
base gr.h mp snf1 wt |
bgk help msubst solve |
bgk help msubst solve |
chou hom p sp |
chou hom p sp |
const ifplot proot strum |
const ifplot proot strum |
cyclic is r sugar |
cyclic is r sugar |
0 |
0 |
[1] |
[1] |
@end example |
@end example |
Line 835 cyclic is r sugar |
|
Line 926 cyclic is r sugar |
|
@var{arg0} $B$,%j%9%H(B, $B%Y%/%H%k(B, $B9TNs0J30$N>l9g(B, $BC1$K(B @var{arg0}, |
@var{arg0} $B$,%j%9%H(B, $B%Y%/%H%k(B, $B9TNs0J30$N>l9g(B, $BC1$K(B @var{arg0}, |
@var{arg1}, ... $B$r0z?t$H$7$F(B @var{function} $B$r8F$S=P$7$=$N(B |
@var{arg1}, ... $B$r0z?t$H$7$F(B @var{function} $B$r8F$S=P$7$=$N(B |
$B7k2L$rJV$9(B. |
$B7k2L$rJV$9(B. |
|
@item |
|
@code{map} $B$N0z?t(B @var{function} $B$GM?$($i$l$kH!?t$O(B, $BFbItE*$K$bH!?t$H(B |
|
$B$7$F<BAu$5$l$F$$$J$1$l$P$J$i$J$$(B. $B$=$&$G$J$1$l$P(B parse error $B$K$J$k(B. |
|
$BNc$($P(B @code{map} $B<+?H$d(B @code{car}, @code{cdr} $B$J$I$OFbItE*$K$OH!?t$G(B |
|
$B$O$J$/(B, Asir $B$NJ8K!$K$*$1$k%-!<%o!<%I$H$7$F<BAu$5$l$F$$$k(B. $B$7$?$,$C$F(B |
|
@code{map} $B$N0z?t$K(B @code{map} $B$r$H$k$3$H$O$G$-$J$$(B. |
\E |
\E |
\BEG |
\BEG |
@item |
@item |
Line 1054 by using @var{options} (@pxref{option}). |
|
Line 1151 by using @var{options} (@pxref{option}). |
|
The value of a specified option is retrieved by @code{getopt}. |
The value of a specified option is retrieved by @code{getopt}. |
@item |
@item |
If @code{getopt()} is called with no argument, then it returns a list |
If @code{getopt()} is called with no argument, then it returns a list |
@code{[[key1,value1],[key2,value2],...]}. In the list, each @code{key} |
@code{[[key1,value1],} @code{[key2,value2],@dots{}]}. |
|
In the list, each @code{key} |
is an option which was specified when the function executing @code{getopt} |
is an option which was specified when the function executing @code{getopt} |
was invoked, and @code{value} is the value of the option. |
was invoked, and @code{value} is the value of the option. |
@item |
@item |