[dbsrgits/Data-Query.git] / lib / Data / Query / Renderer / SQL / Slice / LimitXY.pm

package Data::Query::Renderer::SQL::Slice::LimitXY;

use Moo::Role;

sub slice_subquery { }

sub slice_stability { }

sub _render_slice {
  my ($self, $dq) = @_;
  [ ($dq->{from} ? $self->_render($dq->{from}) : ()),
    $self->_format_keyword('LIMIT'),
    ($dq->{offset}
      ? ($self->_render($dq->{offset}), ',')
      : ()),
    $self->_render($dq->{limit}),
  ];
}

1;
Commit	Line	Data
a2b858ee	1	package Data::Query::Renderer::SQL::Slice::LimitXY;
	2
	3	use Moo::Role;
	4
	5	sub slice_subquery { }
	6
	7	sub slice_stability { }
	8
	9	sub _render_slice {
	10	my ($self, $dq) = @_;
	11	[ ($dq->{from} ? $self->_render($dq->{from}) : ()),
	12	$self->_format_keyword('LIMIT'),
	13	($dq->{offset}
	14	? ($self->_render($dq->{offset}), ',')
	15	: ()),
	16	$self->_render($dq->{limit}),
	17	];
	18	}
	19
	20	1;