// // Get_System: C // // Return a second level object field of the system object. // REBVAL *Get_System(REBCNT i1, REBCNT i2) { REBVAL *obj; obj = CTX_VAR(VAL_CONTEXT(ROOT_SYSTEM), i1); if (i2 == 0) return obj; assert(IS_OBJECT(obj)); return Get_Field(VAL_CONTEXT(obj), i2); }
*/ REBVAL *Get_System(REBCNT i1, REBCNT i2) /* ** Return a second level object field of the system object. ** ***********************************************************************/ { REBVAL *obj; obj = VAL_OBJ_VALUES(ROOT_SYSTEM) + i1; if (!i2) return obj; ASSERT1(IS_OBJECT(obj), RP_BAD_OBJ_INDEX); return Get_Field(VAL_OBJ_FRAME(obj), i2); }
double Length (void) { Get_Field (length, &dvalue); return (dvalue); }
int Max_Fare (void) { Get_Field (max_fare, &lvalue); return (lvalue); }
char * Type (void) { Get_Field (type, svalue); return (svalue); }
double Min_X (void) { Get_Field (min_x, &dvalue); return (dvalue); }
double Max_X (void) { Get_Field (max_x, &dvalue); return (dvalue); }
int Stop (void) { Get_Field (stop, &lvalue); return (lvalue); }
int Out_Link (void) { Get_Field (out_link, &lvalue); return (lvalue); }
int Speed (void) { Get_Field (speed, &lvalue); return (lvalue); }
int Capacity (void) { Get_Field (capacity, &lvalue); return (lvalue); }
int Out_High (void) { Get_Field (out_high, &lvalue); return (lvalue); }
int Penalty (void) { Get_Field (penalty, &lvalue); return (lvalue); }
int Out_Low (void) { Get_Field (out_low, &lvalue); return (lvalue); }
int In_High (void) { Get_Field (in_high, &lvalue); return (lvalue); }
int In_Low (void) { Get_Field (in_low, &lvalue); return (lvalue); }
int Route (void) { Get_Field (route, &lvalue); return (lvalue); }
int Zone (void) { Get_Field (zone, &lvalue); return (lvalue); }
int Time (void) { Get_Field (time, &lvalue); return (lvalue); }
double Y (void) { Get_Field (y, &dvalue); return (dvalue); }
int ID (void) { Get_Field (id, &lvalue); return (lvalue); }
int In_Link (void) { Get_Field (in_link, &lvalue); return (lvalue); }
double X (void) { Get_Field (x, &dvalue); return (dvalue); }
int Link (void) { Get_Field (link, &lvalue); return (lvalue); }
int Area_Type (void) { Get_Field (area, &lvalue); return (lvalue); }
int Node (void) { Get_Field (node, &lvalue); return (lvalue); }
double Min_Y (void) { Get_Field (min_y, &dvalue); return (dvalue); }
double Offset (void) { Get_Field (offset, &dvalue); return (dvalue); }
double Max_Y (void) { Get_Field (max_y, &dvalue); return (dvalue); }
int Lane (void) { Get_Field (lane, &lvalue); return (lvalue); }