mirror of https://github.com/japl-lang/japl.git
45 lines
1.3 KiB
Nim
45 lines
1.3 KiB
Nim
# Copyright 2020 Mattia Giambirtone
|
|
#
|
|
# Licensed under the Apache License, Version 2.0 (the "License");
|
|
# you may not use this file except in compliance with the License.
|
|
# You may obtain a copy of the License at
|
|
#
|
|
# http://www.apache.org/licenses/LICENSE-2.0
|
|
#
|
|
# Unless required by applicable law or agreed to in writing, software
|
|
# distributed under the License is distributed on an "AS IS" BASIS,
|
|
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
|
# See the License for the specific language governing permissions and
|
|
# limitations under the License.
|
|
|
|
# Implementation of iterable types and iterators in JAPL
|
|
|
|
import baseObject
|
|
|
|
|
|
type
|
|
Iterable* = object of Obj
|
|
## Defines the standard interface
|
|
## for iterable types in JAPL
|
|
length*: int
|
|
capacity*: int
|
|
Iterator* = object of Iterable
|
|
## This object drives iteration
|
|
## for every iterable type in JAPL
|
|
iterable*: ptr Obj
|
|
iterCount*: int
|
|
|
|
|
|
proc getIter*(self: Iterable): Iterator =
|
|
## Returns the iterator object of an
|
|
## iterable, which drives foreach
|
|
## loops
|
|
raise newException(NotImplementedError, "")
|
|
|
|
|
|
proc next*(self: Iterator): ptr Obj =
|
|
## Returns the next element from
|
|
## the iterator or nil if the
|
|
## iterator has been consumed
|
|
raise newException(NotImplementedError, "")
|