From d5ba2e2172312221b13e5b09cb0807f9bbf2f722 Mon Sep 17 00:00:00 2001 From: Andrew Whatson Date: Tue, 16 Aug 2022 19:53:26 +1000 Subject: [PATCH] Fix node-type collisions --- ps-compiler/prescheme/primop/c-base.scm | 2 +- ps-compiler/prescheme/primop/c-vector.scm | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/ps-compiler/prescheme/primop/c-base.scm b/ps-compiler/prescheme/primop/c-base.scm index 1552690..bae4b54 100644 --- a/ps-compiler/prescheme/primop/c-base.scm +++ b/ps-compiler/prescheme/primop/c-base.scm @@ -13,7 +13,7 @@ #:use-module (ps-compiler node node-util) #:use-module (ps-compiler node variable) #:use-module (ps-compiler prescheme form) - #:use-module (ps-compiler prescheme infer-early) + #:use-module ((ps-compiler prescheme infer-early) #:select (get-variable-type)) #:use-module (ps-compiler prescheme primop c-primop) #:use-module (ps-compiler prescheme spec) #:use-module (ps-compiler prescheme type) diff --git a/ps-compiler/prescheme/primop/c-vector.scm b/ps-compiler/prescheme/primop/c-vector.scm index cd1306b..3493b39 100644 --- a/ps-compiler/prescheme/primop/c-vector.scm +++ b/ps-compiler/prescheme/primop/c-vector.scm @@ -9,7 +9,7 @@ (define-module (ps-compiler prescheme primop c-vector) #:use-module (ice-9 format) #:use-module (ps-compiler node node) - #:use-module (ps-compiler prescheme infer-early) + #:use-module (ps-compiler node node-util) #:use-module (ps-compiler prescheme primop c-primop) #:use-module (ps-compiler prescheme record) #:use-module (ps-compiler prescheme type))