Lines Matching refs:Snode
801 Snode : Node_Id; variable
804 Snode := New_Node (K, Loc);
805 Set_Right_Opnd (Snode, Relocate_Node (Right));
806 Set_Chars (Snode, Chars (E));
807 Set_Etype (Snode, Base_Type (Entyp));
808 Set_Entity (Snode, E);
813 Set_Shift_Count_OK (Snode, True);
821 Set_Left_Opnd (Snode, Relocate_Node (Left));
822 Rewrite (N, Snode);
839 Set_Left_Opnd (Snode,
841 Rewrite (N, Unchecked_Convert_To (Typ, Snode));