/
Sapphire/bin/
Sapphire/db/
Sapphire/db/OLC_rooms/
Sapphire/db/abi/
Sapphire/db/em_src/
Sapphire/db/helps/
Sapphire/db/helps/emman/ifunc/
Sapphire/db/npcs/Tatt/
Sapphire/db/objects/Tatt/
Sapphire/db/q_data/
Sapphire/db/rooms/Tatt/
Sapphire/doc/
Sapphire/doc/em/
Sapphire/etc/
Sapphire/src/abic/
Sapphire/src/areacon/
Sapphire/src/client/
Sapphire/src/embc/
Sapphire/src/emi/
Sapphire/src/emi/test/
Sapphire/src/include/
Sapphire/src/sapphire/em/
Sapphire/src/tcon/
;
; test2.abi
;
; Copyright (C) 1996 Christopher D. Granz
; All rights reserved
;
; Compiles to .emo file.  8th format.
;

int4 8061981                 ; Magic number.

int1 8                       ; File format version.

int2 0                       ; File information.

int2 3                       ; Number of entries in the symbol table.
;
; Symbol Table
;
int2 10
string "cmd_testem"
int2 14
string "iwrite_to_char"
int2 8
string "ione_arg"

int2 1                       ; Number of functions.

;
; Function: cmd_testem()
;
int4 0                       ; Function flags.
int1 2                       ; Number of arguments.
; Argument types.
int1 6                   ; TYPE_OBJECT
int1 5                   ; TYPE_STRING
int1 0                       ; Number of return values.
int2 0                       ; Symbol table reference.
int4 205                     ; Code size.
; Function code.
int1 4                       ; NEW_OBJECT
int1 3                       ; NEW_STRING
int1 22                      ; ASSIGN_LOCAL
int2 1
int1 22                      ; ASSIGN_LOCAL
int2 0
int1 13                      ; PUSH_STRING
int2 136
string
  "This command is being run by the Emerald Interpreter :)\n\r
Parsing example:\n\r
    The first argument you typed was (parsed by ione_arg()): "
int1 16                      ; PUSH_LOCAL
int2 0
int1 76                      ; TRANS_BUILTIN_FUNC
int2 1
int1 38                      ; CALL_BUILTIN_FUNC
int1 2
int1 6                   ; TYPE_OBJECT
int1 5                   ; TYPE_STRING
int1 1
int1 3                   ; TYPE_INT
int1 18                      ; POP
int1 16                      ; PUSH_LOCAL
int2 1
int1 76                      ; TRANS_BUILTIN_FUNC
int2 2
int1 38                      ; CALL_BUILTIN_FUNC
int1 1
int1 5                   ; TYPE_STRING
int1 2
int1 5                   ; TYPE_STRING
int1 5                   ; TYPE_STRING
int1 16                      ; PUSH_LOCAL
int2 0
int1 76                      ; TRANS_BUILTIN_FUNC
int2 1
int1 38                      ; CALL_BUILTIN_FUNC
int1 2
int1 6                   ; TYPE_OBJECT
int1 5                   ; TYPE_STRING
int1 1
int1 3                   ; TYPE_INT
int1 18                      ; POP
int1 18                      ; POP
int1 13                      ; PUSH_STRING
int2 2
string "\n\r"
int1 16                      ; PUSH_LOCAL
int2 0
int1 76                      ; TRANS_BUILTIN_FUNC
int2 1
int1 38                      ; CALL_BUILTIN_FUNC
int1 2
int1 6                   ; TYPE_OBJECT
int1 5                   ; TYPE_STRING
int1 1
int1 3                   ; TYPE_INT
int1 18                      ; POP
int1 0                       ; END
; Function code end.

;
; End of test2.abi
;