version 1.25, 2025/04/18 01:23:05
|
version 1.28, 2025/04/18 19:43:18
|
Line 235 Steve Zeck (Code)
|
Line 235 Steve Zeck (Code)
|
$ @command{./freem} [@emph{OPTIONS}...] [[-r <entryref>] | [--routine=<entryref>]] |
$ @command{./freem} [@emph{OPTIONS}...] [[-r <entryref>] | [--routine=<entryref>]] |
@end example |
@end example |
|
|
When FreeM loads, it searches the @code{SYSTEM} namespace for the @code{^%SYSINIT} routine, and begins executing it. |
When FreeM loads, it searches the @code{SYSTEM} namespace for the @code{%SYSINIT} routine, and begins executing it. |
|
|
When @code{-r} or @code{--routine} are passed on the command line, FreeM will load and run the specified routine after running @code{^%SYSINIT}. Beginning with FreeM 0.1.7, routines invoked in this manner are no longer required to perform their own namespace setup with @code{VIEW} commands. |
When @code{-r} or @code{--routine} are passed on the command line, FreeM will load and run the specified routine after running @code{%SYSINIT}. Beginning with FreeM 0.1.7, routines invoked in this manner are no longer required to perform their own namespace setup with @code{VIEW} commands. |
|
|
@section %SYSINIT Routine |
@section %SYSINIT Routine |
|
|
The @code{^%SYSINIT} routine runs every time a FreeM interpreter process starts. This routine defines some useful constants, enables handling of @code{TRIGGER} events, and handles the execution of code passed via the @code{-x\--execute} or routines passed via @code{-r|--routine}. |
The @code{%SYSINIT} routine runs every time a FreeM interpreter process starts. This routine defines some useful constants, enables handling of @code{TRIGGER} events, and handles the execution of code passed via the @code{-x\--execute} or routines passed via @code{-r|--routine}. |
|
|
Do not modify the supplied @code{^%SYSINIT} routine to add site-specific startup items. Instead, create a @code{^LCLINIT} routine in the @code{USER} namespace of one or more environments. @code{^%SYSINIT} will automatically run @code{^LCLINIT} each time it starts. |
Do not modify the supplied @code{%SYSINIT} routine to add site-specific startup items. Instead, create a @code{LCLINIT} routine in the @code{USER} namespace of one or more environments. @code{%SYSINIT} will automatically run @code{LCLINIT} each time it starts. |
|
|
@section Command-Line Options |
@section Command-Line Options |
@cindex options, command-line |
@cindex options, command-line |
Line 278 Allows your M routines to be used as UNI
|
Line 278 Allows your M routines to be used as UNI
|
Selects the FreeM namespace to be entered on startup. Must be defined in @file{/etc/<environment>/freem.conf}. |
Selects the FreeM namespace to be entered on startup. Must be defined in @file{/etc/<environment>/freem.conf}. |
|
|
@item @option{-r @emph{<entryref>}}, @option{--routine=@emph{<entryref>}} |
@item @option{-r @emph{<entryref>}}, @option{--routine=@emph{<entryref>}} |
Causes @code{<entryref>} to be executed at load, instead of @code{^%SYSINIT}. |
Causes @code{<entryref>} to be executed at load, instead of @code{%SYSINIT}. |
|
|
@item @option{--standard=@emph{<standard>}} |
@item @option{--standard=@emph{<standard>}} |
Sets the default FreeM dialect to use for new routine buffers. |
Sets the default FreeM dialect to use for new routine buffers. |
Line 435 Displays a list of @code{LOCK}s held in
|
Line 435 Displays a list of @code{LOCK}s held in
|
@item @command{rbuf} |
@item @command{rbuf} |
Lists the status of all FreeM routine buffers. |
Lists the status of all FreeM routine buffers. |
|
|
@anchor{dbstats} |
|
@item @command{dbstats} |
|
Shows statistics for the BerkeleyDB global handler. |
|
|
|
@anchor{wh} |
@anchor{wh} |
@item @command{wh} |
@item @command{wh} |
Forces an immediate flush of this process's @code{readline} history buffer to disk. |
Forces an immediate flush of this process's @code{readline} history buffer to disk. |
Line 474 DEFAULT.USER>
|
Line 470 DEFAULT.USER>
|
@end example |
@end example |
|
|
@item @command{!@emph{<external-command>}} |
@item @command{!@emph{<external-command>}} |
Invokes a shell to run @emph{<external-command>} from within FreeM. This temporarily disables @command{SIGALRM} handling in FreeM, which may interrupt the use of event-driven M programming commands including @command{ESTART} and @command{ESTOP}. |
Invokes a shell to run @emph{<external-command>} from within FreeM. This temporarily disables @command{SIGALRM} handling in FreeM, which may interrupt the use of event-driven M programming commands including @command{ASTART} and @command{ASTOP}. |
|
|
If the @command{>} character is supplied immediately preceding @emph{<external-command>}, FreeM will append the contents of an M local or global variable referenced in @code{^$JOB($JOB,"PIPE_GLVN")} to the standard input stream of @emph{<external-command>}. |
If the @command{>} character is supplied immediately preceding @emph{<external-command>}, FreeM will append the contents of an M local or global variable referenced in @code{^$JOB($JOB,"PIPE_GLVN")} to the standard input stream of @emph{<external-command>}. |
|
|
Line 663 Please note that FreeM is not entirely s
|
Line 659 Please note that FreeM is not entirely s
|
|
|
Returns a comma-delimited list of error conditions currently present, and is writable. An empty @code{$ECODE} indicates no errors. |
Returns a comma-delimited list of error conditions currently present, and is writable. An empty @code{$ECODE} indicates no errors. |
|
|
|
Writing a value in the format @code{,<error-code>,} into @code{$ECODE} will raise that error condition. |
|
|
@node $ESTACK |
@node $ESTACK |
@section $ESTACK |
@section $ESTACK |
@cindex $ESTACK |
@cindex $ESTACK |
Line 1242 The optional fourth argument is the fina
|
Line 1240 The optional fourth argument is the fina
|
Can be used on the left-hand side of an expression in order to @code{@ref{SET}} a value into a @code{d}-delimited piece of @code{s}, as in: |
Can be used on the left-hand side of an expression in order to @code{@ref{SET}} a value into a @code{d}-delimited piece of @code{s}, as in: |
|
|
@example |
@example |
; ^jpw="this^is^a^piece" |
; ^snw="this^is^a^piece" |
SET $PIECE(^jpw,"^",2)="isn't" ; => "this^isn't^a^piece" |
SET $PIECE(^snw,"^",2)="isn't" ; => "this^isn't^a^piece" |
@end example |
@end example |
|
|
@node $QLENGTH() |
@node $QLENGTH() |
Line 1275 Returns the number of subscripts in @emp
|
Line 1273 Returns the number of subscripts in @emp
|
@code{$QSUBSCRIPT(@emph{expr V glvn},@emph{expr V n})} |
@code{$QSUBSCRIPT(@emph{expr V glvn},@emph{expr V n})} |
@end example |
@end example |
|
|
Returns the @emph{n}th subscript of @emph{glvn}. |
In the RHS form, returns the @emph{n}th subscript of @emph{glvn}. |
|
|
@emph{Example} |
@emph{Example} |
|
|
Line 1283 Returns the @emph{n}th subscript of @emp
|
Line 1281 Returns the @emph{n}th subscript of @emp
|
@code{SET SUB=$QSUBSCRIPT("^GBL(1,2,3)",2) ; => 2} |
@code{SET SUB=$QSUBSCRIPT("^GBL(1,2,3)",2) ; => 2} |
@end example |
@end example |
|
|
|
@emph{Syntax} |
|
|
|
@example |
|
@code{SET $QSUBSCRIPT(@emph{expr V glvn},@emph{expr V n})=@emph{expr} ; => ^GBL(1,4,3)} |
|
@end example |
|
|
|
In the LHS form, sets the @emph{n}th subscript of @emph{glvn} to @emph{expr}. |
|
|
@node $QUERY() |
@node $QUERY() |
@section $QUERY |
@section $QUERY |
@cindex $QUERY |
@cindex $QUERY |
Line 1300 Returns the next subscripted reference i
|
Line 1306 Returns the next subscripted reference i
|
|
|
We will assume the following data structure exists: |
We will assume the following data structure exists: |
@example |
@example |
^jpw(1)=1 |
^snw(1)=1 |
^jpw(1,2)="foo" |
^snw(1,2)="foo" |
^jpw(2)=3 |
^snw(2)=3 |
^jpw(3)="" |
^snw(3)="" |
@end example |
@end example |
|
|
The following code will retrieve the next subscripted name after @code{^jpw(1)}: |
The following code will retrieve the next subscripted name after @code{^snw(1)}: |
|
|
@example |
@example |
@code{SET NEXTNAM=$QUERY(^jpw(1)) ; => ^jpw(1,2)} |
@code{SET NEXTNAM=$QUERY(^snw(1)) ; => ^snw(1,2)} |
@end example |
@end example |
|
|
@node $RANDOM() |
@node $RANDOM() |
Line 1494 Always @emph{true}
|
Line 1500 Always @emph{true}
|
@cindex intrinsic functions, $ZCALL |
@cindex intrinsic functions, $ZCALL |
@cindex intrinsic functions, implementation-specific |
@cindex intrinsic functions, implementation-specific |
|
|
|
Purpose unknown. |
|
|
@node $ZCRC() |
@node $ZCRC() |
@section $ZCRC |
@section $ZCRC |
@cindex $ZCRC |
@cindex $ZCRC |
Line 1514 Returns a checksum of @code{arg1}.
|
Line 1522 Returns a checksum of @code{arg1}.
|
@cindex intrinsic functions, $ZDATA |
@cindex intrinsic functions, $ZDATA |
@cindex intrinsic functions, implementation-specific |
@cindex intrinsic functions, implementation-specific |
|
|
|
Purpose unknown. |
|
|
@node $ZDATE() |
@node $ZDATE() |
@section $ZDATE |
@section $ZDATE |
@cindex $ZDATE |
@cindex $ZDATE |
Line 1538 The optional @emph{<format-string>} foll
|
Line 1548 The optional @emph{<format-string>} foll
|
@cindex intrinsic functions, $ZEDIT |
@cindex intrinsic functions, $ZEDIT |
@cindex intrinsic functions, implementation-specific |
@cindex intrinsic functions, implementation-specific |
|
|
|
Purpose unknown. |
|
|
@node $ZHOROLOG() |
@node $ZHOROLOG() |
@section $ZHOROLOG |
@section $ZHOROLOG |
@cindex $ZHOROLOG |
@cindex $ZHOROLOG |
Line 1562 $ZHOROLOG(@emph{<date-value>},@emph{<for
|
Line 1574 $ZHOROLOG(@emph{<date-value>},@emph{<for
|
@cindex intrinsic functions, $ZKEY |
@cindex intrinsic functions, $ZKEY |
@cindex intrinsic functions, implementation-specific |
@cindex intrinsic functions, implementation-specific |
|
|
|
Purpose unknown. |
|
|
@node $ZLENGTH() |
@node $ZLENGTH() |
@section $ZLENGTH |
@section $ZLENGTH |
@cindex $ZLENGTH |
@cindex $ZLENGTH |
@cindex intrinsic functions, $ZLENGTH |
@cindex intrinsic functions, $ZLENGTH |
@cindex intrinsic functions, implementation-specific |
@cindex intrinsic functions, implementation-specific |
|
|
|
Purpose unknown. |
|
|
@node $ZLSD() |
@node $ZLSD() |
@section $ZLSD |
@section $ZLSD |
@cindex $ZLSD |
@cindex $ZLSD |
Line 1596 Returns the Levenshtein distance between
|
Line 1612 Returns the Levenshtein distance between
|
@cindex intrinsic functions, $ZNAME |
@cindex intrinsic functions, $ZNAME |
@cindex intrinsic functions, implementation-specific |
@cindex intrinsic functions, implementation-specific |
|
|
|
Purpose unknown. |
|
|
@node $ZNEXT() |
@node $ZNEXT() |
@section $ZNEXT |
@section $ZNEXT |
@cindex $ZNEXT |
@cindex $ZNEXT |
@cindex intrinsic functions, $ZNEXT |
@cindex intrinsic functions, $ZNEXT |
@cindex intrinsic functions, implementation-specific |
@cindex intrinsic functions, implementation-specific |
|
|
|
Purpose unknown. |
|
|
@node $ZORDER() |
@node $ZORDER() |
@section $ZORDER |
@section $ZORDER |
@cindex $ZORDER |
@cindex $ZORDER |
@cindex intrinsic functions, $ZORDER |
@cindex intrinsic functions, $ZORDER |
@cindex intrinsic functions, implementation-specific |
@cindex intrinsic functions, implementation-specific |
|
|
|
Purpose unknown. |
|
|
@node $ZPIECE() |
@node $ZPIECE() |
@section $ZPIECE |
@section $ZPIECE |
@cindex $ZPIECE |
@cindex $ZPIECE |
@cindex intrinsic functions, $ZPIECE |
@cindex intrinsic functions, $ZPIECE |
@cindex intrinsic functions, implementation-specific |
@cindex intrinsic functions, implementation-specific |
|
|
|
Purpose unknown. |
|
|
@node $ZPREVIOUS() |
@node $ZPREVIOUS() |
@section $ZPREVIOUS |
@section $ZPREVIOUS |
@cindex $ZPREVIOUS |
@cindex $ZPREVIOUS |
@cindex intrinsic functions, $ZPREVIOUS |
@cindex intrinsic functions, $ZPREVIOUS |
@cindex intrinsic functions, implementation-specific |
@cindex intrinsic functions, implementation-specific |
|
|
|
Purpose unknown. |
|
|
@node $ZREPLACE() |
@node $ZREPLACE() |
@section $ZREPLACE |
@section $ZREPLACE |
@cindex $ZREPLACE |
@cindex $ZREPLACE |
Line 1918 Identical to @ref{$TRANSLATE()}, except
|
Line 1944 Identical to @ref{$TRANSLATE()}, except
|
* WITH:: Set prefix for future variable references. |
* WITH:: Set prefix for future variable references. |
* WRITE:: Write output to current input/output device. |
* WRITE:: Write output to current input/output device. |
* XECUTE:: Interpret string as M code. |
* XECUTE:: Interpret string as M code. |
* ZALLOCATE:: Alternative to @code{LOCK}. |
|
* ZBREAK:: Unknown. |
* ZBREAK:: Unknown. |
* ZDEALLOCATE:: Alternative to @code{LOCK}. |
|
* ZGO:: Unknown. |
* ZGO:: Unknown. |
* ZHALT:: Unknown. |
* ZHALT:: Unknown. |
* ZINSERT:: Insert code into routine buffer. |
* ZINSERT:: Insert code into routine buffer. |
Line 2491 In the above @emph{inclusive} form, @cod
|
Line 2515 In the above @emph{inclusive} form, @cod
|
@cartouche |
@cartouche |
@quotation |
@quotation |
@emph{Note} |
@emph{Note} |
The below @emph{argumentless} and @emph{exclusive} forms of @code{KSUBSCRIPTS} are not implemented in FreeM, as of version 0.3.3, but are planned for a future release. |
The below @emph{argumentless} and @emph{exclusive} forms of @code{KSUBSCRIPTS} are not implemented in FreeM, as of version 0.64.0-rc0, but are planned for a future release. |
@end quotation |
@end quotation |
@end cartouche |
@end cartouche |
|
|
Line 2567 LOCK[@emph{:postcondition}] [+|-]@emph{n
|
Line 2591 LOCK[@emph{:postcondition}] [+|-]@emph{n
|
|
|
@emph{Example} |
@emph{Example} |
|
|
This example will increment the lock counter for @code{^JPW} and decrement the lock counter for @code{^MJR}. |
This example will increment the lock counter for @code{^SNW} and decrement the lock counter for @code{^MJR}. |
|
|
@example |
@example |
LOCK +^JPW,-^MJR |
LOCK +^SNW,-^MJR |
@end example |
@end example |
|
|
In its non-incremental form, @code{LOCK} releases all @code{LOCK}s held by the current process, and then attempts to acquire a lock on each @emph{name}, provided the optional @emph{postcondition} evaluates to @emph{true} or is omitted. If @emph{timeout} is supplied, FreeM will attempt to lock @emph{name} for no more than @emph{timeout} seconds. |
In its non-incremental form, @code{LOCK} releases all @code{LOCK}s held by the current process, and then attempts to acquire a lock on each @emph{name}, provided the optional @emph{postcondition} evaluates to @emph{true} or is omitted. If @emph{timeout} is supplied, FreeM will attempt to lock @emph{name} for no more than @emph{timeout} seconds. |
Line 2643 NEW@emph{:postcondition} @emph{name}=@em
|
Line 2667 NEW@emph{:postcondition} @emph{name}=@em
|
|
|
In its initializing form, @code{NEW} stacks variable @emph{name} and sets its value to @emph{expr}, provided the optional @emph{postcondition} evaluates to @emph{true} or is omitted. When the current stack frame is exited, the previous value is restored. |
In its initializing form, @code{NEW} stacks variable @emph{name} and sets its value to @emph{expr}, provided the optional @emph{postcondition} evaluates to @emph{true} or is omitted. When the current stack frame is exited, the previous value is restored. |
|
|
|
@emph{Syntax} |
|
@example |
|
NEW@emph{:postcondition} @emph{name}=$%@emph{^CLASS}(@emph{initializer-list}) |
|
@end example |
|
|
|
In its object-oriented form, @code{NEW} creates an instance of class @emph{^CLASS} in local variable @emph{name} and calls the constructor of @emph{^CLASS}, passing @emph{initializer-list} as its argument(s). |
|
|
@node OPEN |
@node OPEN |
@section OPEN |
@section OPEN |
@cindex OPEN |
@cindex OPEN |
Line 3006 Closes all global data files open in the
|
Line 3037 Closes all global data files open in the
|
VIEW 21 |
VIEW 21 |
@end example |
@end example |
|
|
@item @code{29} - Symbol Table Copy |
|
Copies the primary symbol table's contents to the alternate symbol table. Takes no arguments. |
|
|
|
@emph{Syntax} |
|
@example |
|
VIEW 29 |
|
@end example |
|
|
|
@item @code{52} - Set G0 Input Translation Table for @code{$IO} |
@item @code{52} - Set G0 Input Translation Table for @code{$IO} |
|
|
@emph{Syntax} |
@emph{Syntax} |
Line 3162 If @emph{tvexpr} evaluates to @emph{true
|
Line 3185 If @emph{tvexpr} evaluates to @emph{true
|
VIEW 83:@emph{tvexpr} |
VIEW 83:@emph{tvexpr} |
@end example |
@end example |
|
|
@item @code{87} - Date Type Definition |
|
We believe this defines date formats for @code{$ZDATE}, but we have not yet figured out how it works. |
|
|
|
@emph{Syntax} |
|
@example |
|
; Syntax unknown |
|
@end example |
|
|
|
@item @code{88} - Time Type Definition |
|
We believe this defines time formats for @code{$ZTIME}, but we have not yet figured out how it works. |
|
|
|
@emph{Syntax} |
|
@example |
|
; Syntax unknown |
|
@end example |
|
|
|
@item @code{91} - Set Default Expression for Missing @code{QUIT} Expression |
|
Sets the default expression to be printed when a @code{QUIT} is encountered where a @code{QUIT} argument would be expected, but was not provided. We're not entirely sure what this does. |
|
|
|
@emph{Syntax} |
|
@example |
|
; Syntax unknown |
|
@end example |
|
|
|
@item @code{92} - Set Type Mismatch Error Flag on @code{EUR2DEM} |
@item @code{92} - Set Type Mismatch Error Flag on @code{EUR2DEM} |
If @emph{tvexpr} evaluates to @emph{true}, a type mismatch error will be thrown in @code{EUR2DEM} currency conversions in certain situations that we do not yet understand. |
If @emph{tvexpr} evaluates to @emph{true}, a type mismatch error will be thrown in @code{EUR2DEM} currency conversions in certain situations that we do not yet understand. |
|
|
Line 3307 WATCH[@emph{:postcondition}] [+|-|?]@emp
|
Line 3306 WATCH[@emph{:postcondition}] [+|-|?]@emp
|
@end example |
@end example |
|
|
|
|
The following example demonstrates turning watchpoint processing on and adding a watchpoint for global variable @code{^jpw(1)}. It then changes the value of @code{^jpw(1)}. |
The following example demonstrates turning watchpoint processing on and adding a watchpoint for global variable @code{^snw(1)}. It then changes the value of @code{^snw(1)}. |
|
|
@example |
@example |
DEFAULT.USER> WATCH |
DEFAULT.USER> WATCH |
|
|
Watchpoints enabled. |
Watchpoints enabled. |
|
|
DEFAULT.USER> WATCH +^JPW(1) |
DEFAULT.USER> WATCH +^SNW(1) |
|
|
Added '^JPW("1")' to the watchlist. |
Added '^SNW("1")' to the watchlist. |
|
|
DEFAULT.USER> SET ^JPW(1)="new value" |
DEFAULT.USER> SET ^SNW(1)="new value" |
|
|
>> WATCHPOINT: ^JPW("1") => 'new value' (changed 1 times) |
>> WATCHPOINT: ^SNW("1") => 'new value' (changed 1 times) |
|
|
@end example |
@end example |
|
|
The following example will remove that watchpoint: |
The following example will remove that watchpoint: |
|
|
@example |
@example |
DEFAULT.USER> WATCH -^JPW(1) |
DEFAULT.USER> WATCH -^SNW(1) |
|
|
Removed '^JPW("1")' from the watchlist. |
Removed '^SNW("1")' from the watchlist. |
|
|
DEFAULT.USER> WATCH ?^JPW(1) |
DEFAULT.USER> WATCH ?^SNW(1) |
|
|
'^JPW("1")' is not being watched. |
'^SNW("1")' is not being watched. |
@end example |
@end example |
|
|
@node WITH |
@node WITH |
Line 3343 DEFAULT.USER> WATCH ?^JPW(1)
|
Line 3342 DEFAULT.USER> WATCH ?^JPW(1)
|
@cindex commands, non-standard |
@cindex commands, non-standard |
@emph{FreeM Extension} |
@emph{FreeM Extension} |
|
|
|
NOTE: This command may be deprecated and removed in future FreeM releases. |
|
|
Sets a prefix to be applied to all subsequent local variable or constant references. |
Sets a prefix to be applied to all subsequent local variable or constant references. |
|
|
@emph{Syntax} |
@emph{Syntax} |
Line 3372 In the above argumentless form, clears t
|
Line 3373 In the above argumentless form, clears t
|
@cindex XECUTE |
@cindex XECUTE |
@cindex commands, XECUTE |
@cindex commands, XECUTE |
|
|
@node ZALLOCATE |
|
@section ZALLOCATE |
|
@cindex ZALLOCATE |
|
@cindex commands, ZALLOCATE |
|
@cindex commands, implementation-specific |
|
@cindex commands, non-standard |
|
@emph{FreeM Extension} |
|
|
|
@node ZBREAK |
@node ZBREAK |
@section ZBREAK |
@section ZBREAK |
@cindex ZBREAK |
@cindex ZBREAK |
Line 3389 In the above argumentless form, clears t
|
Line 3382 In the above argumentless form, clears t
|
@cindex commands, non-standard |
@cindex commands, non-standard |
@emph{FreeM Extension} |
@emph{FreeM Extension} |
|
|
@node ZDEALLOCATE |
|
@section ZDEALLOCATE |
|
@cindex ZDEALLOCATE |
|
@cindex commands, ZDEALLOCATE |
|
@cindex commands, implementation-specific |
|
@cindex commands, non-standard |
|
@emph{FreeM Extension} |
|
|
|
@node ZGO |
@node ZGO |
@section ZGO |
@section ZGO |
@cindex ZGO |
@cindex ZGO |
Line 3885 Returns or sets the maximum number of ch
|
Line 3870 Returns or sets the maximum number of ch
|
Returns or sets the maximum number of characters of a single global subscript, from 1-255. |
Returns or sets the maximum number of characters of a single global subscript, from 1-255. |
|
|
@item @code{SINGLE_USER} +R +U -D |
@item @code{SINGLE_USER} +R +U -D |
If set to @code{1}, FreeM will skip all file locking operations on globals, as well as the @code{LOCK} and @code{ZALLOCATE} tables. If set to @code{0}, FreeM will enforce file locking on both. |
If set to @code{1}, FreeM will skip all file locking operations on globals. If set to @code{0}, FreeM will enforce file locking on both. |
|
|
Setting @code{SINGLE_USER} to @code{1} will improve FreeM performance, but you must @emph{ONLY} use this on systems where you are absolutely sure that only one FreeM process will run at any given time, as running multiple instances of FreeM concurrently when any of them are set to @code{SINGLE_USER} mode @emph{will} cause global data and @code{LOCK}/@code{ZALLOCATE} table corruption! |
Setting @code{SINGLE_USER} to @code{1} will improve FreeM performance, but you must @emph{ONLY} use this on systems where you are absolutely sure that only one FreeM process will run at any given time, as running multiple instances of FreeM concurrently when any of them are set to @code{SINGLE_USER} mode @emph{will} cause global data corruption. |
|
|
@item @code{CHARACTER} +R -U -D |
@item @code{CHARACTER} +R -U -D |
Returns the character set of the job. |
Returns the character set of the job. |
Line 4187 Forces a number to positive, whether pos
|
Line 4172 Forces a number to positive, whether pos
|
@section Unary - |
@section Unary - |
@cindex operators, unary - |
@cindex operators, unary - |
|
|
|
Forces a number to negative, whether positive or negative. Also forces numeric coercion of strings. |
|
|
@node + |
@node + |
@section + (Add) |
@section + (Add) |
@cindex operators, + |
@cindex operators, + |
|
|
|
@emph{Syntax} |
|
|
|
@example |
|
S X=1+2 ; => 3 |
|
@end example |
|
|
|
Adds numbers together. |
|
|
@node += |
@node += |
@section += (Add/Assign) |
@section += (Add/Assign) |
@cindex operators, += |
@cindex operators, += |
|
|
|
@emph{Syntax} |
|
|
|
@example |
|
S X=5 |
|
S X+=3 ; => 8 |
|
@end example |
|
|
|
Increments the variable on the LHS by the value on the RHS. |
|
|
@node ++ |
@node ++ |
@section ++ (Postfix Increment) |
@section ++ (Postfix Increment) |
@cindex operators, ++ |
@cindex operators, ++ |
|
|
|
Increments a variable by 1. |
|
|
@node - |
@node - |
@section - (Subtract) |
@section - (Subtract) |
@cindex operators, - |
@cindex operators, - |
|
|
|
Subtracts one number from another. |
|
|
@node -= |
@node -= |
@section -= (Subtract/Assign) |
@section -= (Subtract/Assign) |
@cindex operators, -= |
@cindex operators, -= |
|
|
|
@emph{Syntax} |
|
|
|
@example |
|
S X=5 |
|
S X-=3 ; => 2 |
|
@end example |
|
|
|
Decrements the variable on the LHS by the value on the RHS. |
|
|
@node -- |
@node -- |
@section -- (Postfix Decrement) |
@section -- (Postfix Decrement) |
@cindex operators, -- |
@cindex operators, -- |
|
|
|
Decrements the variable by one. |
|
|
@node * |
@node * |
@section * (Multiply) |
@section * (Multiply) |
@cindex operators, * |
@cindex operators, * |
|
|
|
Multiplies one number by another. |
|
|
@node *= |
@node *= |
@section *= (Multiply/Assign) |
@section *= (Multiply/Assign) |
@cindex operators, *= |
@cindex operators, *= |
|
|
|
|
|
|
@node / |
@node / |
@section / (Divide) |
@section / (Divide) |
@cindex operators, / |
@cindex operators, / |
Line 4627 TL1:DEFAULT.USER> trantab
|
Line 4650 TL1:DEFAULT.USER> trantab
|
------- ------ -------- |
------- ------ -------- |
1 SET ^FOO=3 |
1 SET ^FOO=3 |
2 KILL ^FOO |
2 KILL ^FOO |
3 SET ^jpw=10 |
3 SET ^snw=10 |
4 SET ^BRANDNEW=6 |
4 SET ^BRANDNEW=6 |
|
|
Global checkpoints: |
Global checkpoints: |
Line 4635 TL1:DEFAULT.USER> trantab
|
Line 4658 TL1:DEFAULT.USER> trantab
|
GLOBAL MODE FILES |
GLOBAL MODE FILES |
------ ---- ----- |
------ ---- ----- |
^BRANDNEW CP_REMOVE IN: /usr/local/var/freem/USER/globals/^BRANDNEW |
^BRANDNEW CP_REMOVE IN: /usr/local/var/freem/USER/globals/^BRANDNEW |
^jpw CP_RESTORE IN: /usr/local/var/freem/USER/globals/^jpw |
^snw CP_RESTORE IN: /usr/local/var/freem/USER/globals/^snw |
OUT: /usr/local/var/freem/USER/globals/^jpw.23390.1.chk |
OUT: /usr/local/var/freem/USER/globals/^snw.23390.1.chk |
^FOO CP_RESTORE IN: /usr/local/var/freem/USER/globals/^FOO |
^FOO CP_RESTORE IN: /usr/local/var/freem/USER/globals/^FOO |
OUT: /usr/local/var/freem/USER/globals/^FOO.23390.1.chk |
OUT: /usr/local/var/freem/USER/globals/^FOO.23390.1.chk |
@end verbatim |
@end verbatim |
Line 4855 You can also set up a trigger that appli
|
Line 4878 You can also set up a trigger that appli
|
|
|
This routine is the implementation of the @code{$ZCOLUMNS} intrinsic special variable. |
This routine is the implementation of the @code{$ZCOLUMNS} intrinsic special variable. |
|
|
@section ^%SYSINIT |
@section %SYSINIT |
@cindex ^%SYSINIT |
@cindex %SYSINIT |
@cindex system library routines, ^%SYSINIT |
@cindex system library routines, %SYSINIT |
|
|
This routine is the default startup routine for FreeM running in direct mode. |
This routine is the default startup routine for FreeM running in direct mode. |
|
|
Line 5859 The FreeM @code{LOCK} table.
|
Line 5882 The FreeM @code{LOCK} table.
|
|
|
Supported actions are @code{list} and @code{remove}. |
Supported actions are @code{list} and @code{remove}. |
|
|
@item zallocate |
|
The FreeM @code{ZALLOCATE} table. |
|
|
|
No actions yet implemented. |
|
|
|
@item journal |
@item journal |
FreeM after-image journaling. |
FreeM after-image journaling. |
|
|
Line 6085 Module headers should adhere to the foll
|
Line 6103 Module headers should adhere to the foll
|
* binding library |
* binding library |
* |
* |
* |
* |
* Author: Serena Willis <jpw@coherent-logic.com> |
* Author: Serena Willis <snw@coherent-logic.com> |
* Copyright (C) 1998 MUG Deutschland |
* Copyright (C) 1998 MUG Deutschland |
* Copyright (C) <Year> Coherent Logic Development LLC |
* Copyright (C) <Year> Coherent Logic Development LLC |
* |
* |