Source Code

(define-data-var counter uint u0)

(define-public (increment)
  (begin
    (var-set counter (+ (var-get counter) u1))
    (ok (var-get counter))
  )
)

(define-read-only (get-counter)
  (ok (var-get counter))
)

;; Contract: file
(define-constant CONTRACT_ID "file")

Functions (2)

FunctionAccessArgs
incrementpublic
get-counterread-only